Как заставить список объекта набрать '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'

Спасибо,

Answer 1

Если вы хотите конвертировать все элементы a в один числовой вектор и length(a) больше 1 (хорошо, даже если длина 1), вы можете unlist сначала объект, а затем конвертировать.

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

Имейте в виду, что здесь нет контроля качества. Также, X$Days могущественное странное имя.

Answer 2

Если ваш список представляет собой несколько элементов, которые необходимо преобразовать в числовые, вы можете добиться этого с помощью lapply(a, as.numeric),

Answer 3

Вы также можете использовать подмножество списков, чтобы выбрать элемент, который вы хотите преобразовать. Было бы полезно, если бы в вашем списке было больше 1 элемента.

as.numeric(a[[1]])

Answer 4

В этом случае цикл также сделает свою работу (и обычно достаточно быстрый).

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

Answer 5

Есть проблемы с некоторыми данными. Рассматривать:

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)))
}