2017-08-12 112 views
2

如何动态地将数据框中的所有列加载到列表中?如何动态地将数据框中的列加载到列表中?

目前,这是我要做的事,但它是非常繁琐:

list(PM = PM, site = site, code = code) 

举例来说,我有这个datafame:

structure(list(Particles = c(0.596667, 0.27, 0.153333, 0, 0.753333, 
    0, 0.35, 0.506667, 1.6, 0.116667), PM = c(35.5158928571429, 16.0714285714286, 
    9.12696428571429, 0, 44.84125, 0, 20.8333333333333, 30.15875, 
    95.2380952380953, 6.94446428571429), timestamp = c(1493310389147, 
    1493310419191, 1493310449254, 1493310479270, 1493310509313, 1493310539387, 
    1493310569416, 1493310599465, 1493310629525, 1502378711339), 
     date = structure(c(1493310389.147, 1493310419.191, 1493310449.254, 
     1493310479.27, 1493310509.313, 1493310539.387, 1493310569.416, 
     1493310599.465, 1493310629.525, 1502378711.339), class = c("POSIXct", 
     "POSIXt"), tzone = "UTC-1"), site = c("ABC", "ABC", 
     "ABC", "ABC", "ABC", "ABC", 
     "ABC", "ABC", "ABC", "ABC" 
     ), code = c("ABC", "ABC", "ABC", 
     "ABC", "ABC", "ABC", "ABC", 
     "ABC", "ABC", "ABC"), key_date = c("2017-04-27", 
     "2017-04-27", "2017-04-27", "2017-04-27", "2017-04-27", "2017-04-27", 
     "2017-04-27", "2017-04-27", "2017-04-27", "2017-08-10")), .Names = c("Particles", 
    "PM", "timestamp", "date", "site", "code", "key_date"), row.names = c(NA, 
    10L), class = "data.frame") 

任何想法?

回答

5

您可以使用as.listunclass直接执行此操作。这两个都返回指定的列表。

as.list(dat) 

或者,你可以利用这样一个事实:data.frame简直就是一个“data.frame”类的列表,

unclass(dat) 

然后,@akrun建议,你可以子集data.frame之前,或者你可以在之后的子集。例如,说一个变量myVars是通过包含要保留的变量名称的选择过程创建的。

myVars <- c("PM","site","code") 

然后

unclass(dat[myVars]) 

unclass(dat)[myVars] 
3

我们可以子集化感兴趣的列后as.list

as.list(df[c("PM", "site", "code")]) 
相关问题