我试图输入id并获取一个主数据帧,直到id文件号我试试这个
pollutant<-function(id,pollutant){
for (i in 1:id) {
filenames=list.files(pattern="csv")
df.list = lapply(filenames, function(i) na.omit(read.csv(i)))
master.df = do.call(rbind, df.list)}
master.df}
但它不断给我数据框中的所有文件 帮助任何人?
答案 0 :(得分:1)
我建议您只使用library(data.table)
rbindlist(lapply(list.files(pattern = "csv"), fread))
。
rbindlist
我认为你可以用na.omit
包裹id
来获取完整的案例。还不清楚你使用replace:true
的内容是什么?
答案 1 :(得分:1)
我认为你是在这之后(未经测试)
pollutant <- function(id){
filenames=list.files(pattern="csv")
df.list = lapply(filenames[1:id], function(f) na.omit(read.csv(f)))
do.call(rbind, df.list)
}