假设你有d1, d2, d3三个data frame

> ls()
[1] "d1" "d2" "d3"
> d1
  x y
1 1 2
> d2
  x y
1 3 5
> d3
  x y
1 3 2
> ds <- ls()
> ds
[1] "d1" "d2" "d3"
> out <- NULL
> for (i in ds) {
+ out <- rbind(out, get(i))
+ }
> out
  x y
1 1 2
2 3 5
3 3 2

最近在看R的关于language 方面的书，不过还不是用的很熟，试试下面的，应该还能再改进

和楼上一样，假设3个data frame

> ls()
[1] "d1" "d2" "d3"
> d1
  x y
1 1 2
2 2 3
> d2
  x y
1 2 4
2 3 6
> d3
  x   y
1 0 1.0
2 1 1.5
> ds <- ls()
> ds

那么一句就可以

> do.call("rbind", lapply(ds, function(x) eval(as.name(x))))
  x   y
1 1 2.0
2 2 3.0
3 2 4.0
4 3 6.0
5 0 1.0
6 1 1.5

rbind
cbind
data.frame

谢谢大家的答复，最后我用下面的命令完成了任务，就没有用for产生一个个data.frame了，直接用lapply,然后do.call
setwd("D:\\DData\\Else\\Disease\\Input_time\\new_format\\address")
filenames<-list.files()
allframes = lapply(filenames,function(x) read.csv(x,header=TRUE))
ddata = do.call(rbind,allframes)


和ntsean的基本一致