合并数据帧从文件名添加日期信息

startYear <- 1998
endYear <- 2017

myData <- data.frame()

require(plyr)

for (myYear in startYear:endYear){
    df <- get(paste0("X", as.character(myYear)))

    df$Year <- myYear

    myData <- rbind.fill(myData, df)
}

而不是使用循环 do.call :

require(tidyverse)

#Creating sample data set - 10 data.frames
for (i in 1:9){
  assign(paste("x200", i, sep=""),
         data.frame(x = c(1:20)))
  }


#Creating the big data.frame
MyBigDataframe <- do.call(rbind.data.frame, mget(ls(pattern = "x20"))) %>% 
  rownames_to_column("file")