r - リストオブジェクトを強制的に「double」と入力する方法

Question

コード：

a <- structure(list(`X$Days` = c("10", "38", "66", "101", "129", "185", "283", 
                                 "374")), .Names = "X$Days")

それならa_

$`X$Days`
[1] "10"  "38"  "66"  "101" "129" "185" "283" "374"

a数値の配列に強制したいのですが、強制関数は私を返します

Error: (list) object cannot be coerced to type 'double'

ありがとう、

score 156 · Accepted Answer

のすべての要素をa単一の数値ベクトルに変換する必要length(a)があり、1より大きい場合（長さが1であってもOK）、unlist最初にオブジェクトを変換してから変換できます。

as.numeric(unlist(a))
# [1]  10  38  66 101 129 185 283 374

ここには品質管理がないことに注意してください。また、X$Days強大な奇妙な名前。

score 44 · Accepted Answer

数値に変換する必要がある複数の要素としてリストを作成する場合は、を使用してこれを実現できますlapply(a, as.numeric)。

score 9 · Accepted Answer

リストサブセットを使用して、変換する要素を選択することもできます。リストに複数の要素が含まれていると便利です。

as.numeric(a[[1]])

score 2 · Accepted Answer

この場合、ループもその役割を果たします（通常は十分に高速です）。

a <- array(0, dim=dim(X))
for (i in 1:ncol(X)) {a[,i] <- X[,i]}

score 1 · Accepted Answer

一部のデータに問題があります。検討：

as.double(as.character("2.e")) # This results in 2

別の解決策：

get_numbers <- function(X) {
    X[toupper(X) != tolower(X)] <- NA
    return(as.double(as.character(X)))
}

5 に答える 5