2

我有一个包含许多列的数据框,名为foo,bar等。

我想提取数据框的每一列以分隔名为 的对象foobar依此类推。在 R 中是否有自动化的方法来做到这一点?

工作示例:

mock <- structure(list(
x = structure(1:3, .Label = c("1", "2", "3"), class = "factor"), 
y = structure(1:3, .Label = c("A", "B", "C"), class = "factor"), 
z = structure(c(1L, 1L, 2L), .Label = c("0", "1"), class = "factor")), 
.Names = c("x", "y", "z"), row.names = c(NA, -3L), class = "data.frame")

输出:

> mock
  x y z
1 1 A 0
2 2 B 0
3 3 C 1

如何编写一个创建 objects 的循环xyz从此数据框的三列?

4

1 回答 1

2
> for (i in 1:ncol(mock)) {
+   assign(names(mock)[i],mock[,i])
+ }
> x
[1] 1 2 3
Levels: 1 2 3
> y
[1] A B C
Levels: A B C
> z
[1] 0 0 1
Levels: 0 1

但是,您应该小心使用assign。使用 可以实现几乎相同的结果attach(mock),它是可逆的 ( detach()) 并且不会无意中覆盖现有变量(它只是掩盖它们)。

于 2013-01-19T15:59:08.810 回答