流水化办公中，通常有格式统一的表格文件产生，但是到最后要将这一堆表格文件整合为大表却很揪心，累断手，如何用R语言进行一次性导入整合呢？
假设我们将D:/input文件夹作为需要导入的表格的存放点，文件夹内所有文件均为此次需要导入数据，那么可以用以下程序进行操作
setwd("D:/")                                                                    #设定工作目录为D盘
a = list.files("input")                                                       #list.files命令将input文件夹下所有文件名输入a
dir = paste("./input/",a,sep="")                                      #用paste命令构建路径变量dir
n = length(dir)                                                                 #读取dir长度，也就是文件夹下的文件个数
merge.data = read.csv(file = dir[1],header=T,sep=",")   #读入第一个文件内容（可以不用先读一个，但是为了简单，省去定义data.frame的时间，我选择先读入一个文件。
for (i in 2:n){
   new.data = read.csv(file = dir[i], header=T, sep=",")
   merge.data = rbind(merge.data,new.data)
}
#循环从第二个文件开始读入所有文件，并组合到merge.data变量中
write.csv(merge.data,file = "./input/merge.csv",row.names=F)  #输出组合后的文件merge.csv到input文件夹

摘自：http://blog.sina.com.cn/s/blog_46d621c00101l66x.html

read后merge就可以了啊

楼上正解，不过可能要根据你excel的sheet名修改

非常感谢你的回答，让我学习到以后能用到的知识，在这个问题中，我想实现的最终结果是最后还是产生十个表格，我并不想把他们整合到一个表中

那就把循环中merge.data那一行去掉，用一个list代替new.data，把十个表分别存在list里面