我使用下面的代码创建了一个数据框列表。我想在此列表上进行以下操作:
按第一列中可用的公共标识符合并数据框
files = list.files(pattern="*.csv")
library(plyr)
list_dataframes <- llply(files, read.table, header = T, sep = ",")
imax <- length(list_dataframes)
i <- 1
for (i in imax) {
list_dataframes[[i]] = list_dataframes[[i]]
i <- i + 1
}
答案 0 :(得分:1)
从每个数据框中删除第二行
list_dataframes <- lapply(list_dataframes, function(x) x[-2,])
按照第一列中可用的公共标识符合并数据框
DF <- Reduce(function(x ,y) merge(x, y, by=names(x)[1]), list_dataframes)
(由于缺乏可重复的例子,未进行测试。)