我有,其對在當前目錄中的所有文件的某些數據提取操作的一些R代碼裏面,使用以下代碼:提取從lapply輸出到數據幀
files <- list.files(".", pattern="*.tts")
results <- lapply(files, data_for_time, "17/06/2006 12:00:00")
從lapply的輸出是下面的(提取的使用dput()
) - 基本上是一個完整的向量列表:
list(c("amer", "14.5"), c("appl", "14.2"), c("brec", "13.1"),
c("camb", "13.5"), c("camo", "30.1"), c("cari", "13.8"),
c("chio", "21.1"), c("dung", "9.4"), c("east", "11.8"), c("exmo",
"12.1"), c("farb", "14.7"), c("hard", "15.6"), c("herm",
"24.3"), c("hero", "13.3"), c("hert", "11.8"), c("hung",
"26"), c("lizr", "14"), c("maid", "30.4"), c("mart", "8.8"
), c("newb", "14.7"), c("newl", "14.3"), c("oxfr", "13.9"
), c("padt", "10.3"), c("pbil", "13.6"), c("pmtg", "11.1"
), c("pmth", "11.7"), c("pool", "14.6"), c("prae", "11.9"
), c("ral2", "12.2"), c("sano", "15.3"), c("scil", "36.2"
), c("sham", "12.9"), c("stra", "30.9"), c("stro", "14.7"
), c("taut", "13.7"), c("tedd", "22.3"), c("wari", "12.7"
), c("weiw", "13.6"), c("weyb", "8.4"))
不過,我想,然後處理這個輸出作爲一個數據幀有兩個列:一個用於字母代碼("amer"
,"appl"
等)和一個用於Ť他編號(14.5
,14.2
等)。
不幸的是,as.data.frame
似乎不適用於列表中嵌套向量的輸入。我應該如何轉換這個?我是否需要改變我的功能data_for_time
返回其值的方式?目前它只返回c(name, value)
。或者是否有從這種輸出轉換爲數據框的好方法?
如果您用過'sapply',而不是'lapply'你可能已經獲得了更多的「常規」的對象。 –