R：合并感兴趣的列表

Question

我有一个像 df_all 这样的列表（见下文）。

A = matrix( ceiling(10*runif(8)), nrow=4)
colnames(A) = c("country", "year_var")   
dfa = data.frame(A)                      

df1 = dfa[1,]                                                                
df2 = dfa[2,]                                                                
df3 = dfa[3,]                                                                
df4 = dfa[4,]                                                                
df_all = list(df1, df2, df3, df4)                                            
df_all  

现在我想通过使用变量 a 来组合感兴趣的列表。

a <- "2,3,4"
b <- strsplit(a, ",")[[1]]

要合并此列表，我使用以下循环：

for (i in 1:length(b)){
c<-b[i]
aa <- df_all[c:c]
print(aa)
}

现在我的问题是，如何合并此结果并将其另存为变量？

谢谢！

Answer 1

这对您有用吗：

basnum<-as.integer(b)
do.call(rbind, df_all[basnum])

通过df_all[basnum]，创建一个仅包含相关 data.frames 的列表。

do.call 将一个函数和一个列表作为参数（还有一些参数，但现在不相关）。然后列表中的项目作为参数传递给函数。

因此，在这种情况下，上面的代码相当于调用：

rbind(df_all[[2]], df_all[[3]], df_all[[4]])

这会生成一个包含所有感兴趣行的 data.frame。