组合来自名称向量的数据帧

Question

我有一个我认为容易解决的问题，但我没有设法找到解决方案。 我有大量的数据框，我想按行绑定。为了避免列出所有数据帧的名称，我使用了＆＃34; paste0＆＃34;快速创建数据帧名称的向量。问题是我没有设法使rbind函数从这个名称向量中识别数据帧。 更明确地说：

df1 <- data.frame(x1 = sample(1:5,5), x2 =  sample(1:5,5))
df2 <- data.frame(x1 = sample(1:5,5), x2 =  sample(1:5,5))
idvec <- noquote(c(paste0("df",c(1,2))))
> [1] df1 df2

我想得到什么：

dftot <- rbind(df1,df2)
   x1 x2
1   4  1
2   5  2
3   1  3
4   3  4
5   2  5
6   5  3
7   1  4
8   2  2
9   3  5
10  4  1

dftot <- rbind(idvec)
>       [,1]  [,2] 
> idvec "df1" "df2"

Answer 1

如果全局环境中有多个对象，其中模式df后跟数字，则一个选项使用ls来查找具有pattern参数的所有对象。使用mget对其进行换行会获得list中的值，我们可以rbind使用do.call。

v1 <- ls(pattern='^df\\d+')
`row.names<-`(do.call(rbind,mget(v1)), NULL)

如果我们知道对象，另一个选项是paste来创建对象名称的向量，然后像以前一样。

v1 <- paste0('df', 1:2)
 `row.names<-`(do.call(rbind,mget(v1)), NULL)

Answer 2

这应该给出结果：

dfcount <- 2
dftot <- df1 #initialise
for(n in 2:dfcount){dftot <- rbind(dftot, eval(as.name(paste0("df", as.character(n)))))}

eval(as.name(variable_name))从与其名称匹配的字符串中读取数据帧。