将矩阵转换为数字数据框

Question

我有一些格式不太方便的数据。它被保存为一个矩阵，所有的列向量都是字符。

datamatrix <- structure(c("1", "2", "3", "4", "0.9301", "0.93", "0.9286", "0.9209", 
                          "0.9", "0.8064", "0.7947", "0.7607", "0.8042", "0.7847", "0.7832", 
                          "0.7578", "0.7487", "0.7105", "0.6566", "0.5951", "0.6951", "0.677", 
                          "0.6588", "0.5922", "0.6889", "0.6471", "0.6524", "0.5932"), .Dim = c(4L, 
                                                                                                7L))

我的目标是将此矩阵转换为数据框，并将列向量转换为数值类。

我尝试了以下程序：

1)

datamatrix2 <- as.data.frame(datamatrix)
datamatrix2 <- as.numeric(datamatrix2)

这给出了错误：

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

2）所以我用sapply试试：

datamatrix3 <- as.data.frame(sapply(datamatrix, as.numeric))

这将我之前拥有的所有列都放在长列中。

3）当我对已经转换为数据帧（但仍然是字符向量）的数据使用 2) 中的应用函数时，它从第一列 (1,2,3,4) 中获取值并将其放入所有其他列（但按降序排列）。

datamatrix4 <- as.data.frame(sapply(datamatrix2, as.numeric))

Answer 1

转换矩阵的最好方法是更改mode. 这样您就可以制作 matrix numeric，然后您可以轻松转换为数据框：

mode(datamatrix) = "numeric"
data.frame(datamatrix)
#   X1     X2     X3     X4     X5     X6     X7
# 1  1 0.9301 0.9000 0.8042 0.7487 0.6951 0.6889
# 2  2 0.9300 0.8064 0.7847 0.7105 0.6770 0.6471
# 3  3 0.9286 0.7947 0.7832 0.6566 0.6588 0.6524
# 4  4 0.9209 0.7607 0.7578 0.5951 0.5922 0.5932