我有一个数据框架，如:
a1 = c(1, 2, 3, 4, 5)
a2 = c(6, 7, 8, 9, 10)
a3 = c(11, 12, 13, 14, 15)
aframe = data.frame(a1, a2, a3)
我试着用下面的方法将其中一列转换为一个向量，但它不起作用:
avector <- as.vector(aframe['a2'])
class(avector)
[1] "data.frame"
这是我能想到的唯一解决方案，但我认为一定有更好的方法:
class(aframe['a2'])
[1] "data.frame"
avector = c()
for(atmp in aframe['a2']) { avector <- atmp }
class(avector)
[1] "numeric"
注:以上词汇可能不正确，请指正。我还在学习r的世界，此外，任何关于这里发生的事情的解释都是非常感谢的(例如，与Python或其他语言有关会有帮助!)
当前回答
另一种选择是使用as。矩阵与as.vector。这可以用于一列，但如果您想将所有列转换为一个向量，也可以这样做。下面是一个可重复的例子，首先将一列转换为一个向量，然后将完整的数据帧转换为一个向量:
a1 = c(1, 2, 3, 4, 5)
a2 = c(6, 7, 8, 9, 10)
a3 = c(11, 12, 13, 14, 15)
aframe = data.frame(a1, a2, a3)
# Convert one column to vector
avector <- as.vector(as.matrix(aframe[,"a2"]))
class(avector)
#> [1] "numeric"
avector
#> [1] 6 7 8 9 10
# Convert all columns to one vector
avector <- as.vector(as.matrix(aframe))
class(avector)
#> [1] "numeric"
avector
#> [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
于2022-08-27使用reprex v2.0.2创建
其他回答
另一种选择是使用as。矩阵与as.vector。这可以用于一列，但如果您想将所有列转换为一个向量，也可以这样做。下面是一个可重复的例子，首先将一列转换为一个向量，然后将完整的数据帧转换为一个向量:
a1 = c(1, 2, 3, 4, 5)
a2 = c(6, 7, 8, 9, 10)
a3 = c(11, 12, 13, 14, 15)
aframe = data.frame(a1, a2, a3)
# Convert one column to vector
avector <- as.vector(as.matrix(aframe[,"a2"]))
class(avector)
#> [1] "numeric"
avector
#> [1] 6 7 8 9 10
# Convert all columns to one vector
avector <- as.vector(as.matrix(aframe))
class(avector)
#> [1] "numeric"
avector
#> [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
于2022-08-27使用reprex v2.0.2创建
你可以使用$ extraction:
class(aframe$a1)
[1] "numeric"
或者双方括号:
class(aframe[["a1"]])
[1] "numeric"
我们还可以将data.frame列一般地转换为简单的向量。作为。Vector是不够的，因为它保留了data.frame类和结构，所以我们还必须取出第一个(也是唯一的)元素:
df_column_object <- aframe[,2]
simple_column <- df_column_object[[1]]
到目前为止建议的所有解决方案都需要硬编码列标题。这使得它们是非泛型的(想象一下将此应用于函数参数)。
当然，您也可以先从列中读取列名，然后将它们插入到其他解决方案的代码中。
如果你只使用提取操作符，它就可以工作。默认情况下，[]设置选项drop=TRUE，这是您在这里想要的。参见'['获取更多细节。
> a1 = c(1, 2, 3, 4, 5)
> a2 = c(6, 7, 8, 9, 10)
> a3 = c(11, 12, 13, 14, 15)
> aframe = data.frame(a1, a2, a3)
> aframe[,'a2']
[1] 6 7 8 9 10
> class(aframe[,'a2'])
[1] "numeric"
a1 = c(1, 2, 3, 4, 5)
a2 = c(6, 7, 8, 9, 10)
a3 = c(11, 12, 13, 14, 15)
aframe = data.frame(a1, a2, a3)
avector <- as.vector(aframe['a2'])
avector<-unlist(avector)
#this will return a vector of type "integer"
