目录中有96个文件夹./data*/ .. 有些文件夹包含.xls文件，有些则没有。 我想建立一个数据框，其中文件中的第6列是行名称，并计算每次出现的方式。
这是一个开始：
setwd("~/")
file_list = list.files(pattern="/data*/*.xls")
library(data.table)
lst <- lapply(file_list, function(x)
fread(x, select=c("V6"))[,
list(ID=paste(V1)])
df <- as.data.frame(Reduce(function(x,y) x[y, on = "ID"], lst))