如何用循环绑定多个数据帧？

我有 105 个带有 xts、zoo class 的数据框，我想将它们的第 6 列合并到一个数据框中。

因此，我创建了一个包含所有数据框名称的数据框，以便将其与“for”函数一起使用：

mydata <- AAL

for (i in 2:105) {
  k <- top100[i,1] # The first column contains all the data frame names
  mydata <- cbind(mydata, k)
}

这显然是错误的，但我不知道如何绑定这么多具有​​完全不同名称的数据框（我的数据框名称是纳斯达克符号），也不知道如何选择所有数据框的第六列。

先感谢您

尝试 foreach 包。可能有更优雅的方法来完成这项任务，但这种方法会起作用。

    library(foreach)
    #create simple data frames with columns named 'A' and 'B'
    df1<-t(data.frame(1,2,3))
    df2<-t(data.frame(4,5,6))
    colnames(df1)<-c('A')
    colnames(df2)<-c('B')
    #make a list 
    dfs<-list(df1,df2)
    #join data frames column by column, this will preserve their names
    foreach(x=1:2
            ,.combine=cbind)%do% # don`t forget this directive
    {
      dfs[[x]]
    }

结果将是：

       A B
    X1 1 4
    X2 2 5
    X3 3 6

选择第 6 列：

df[,6]