2017-08-12 117 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")]) 
相關問題