在列表

Question

我希望将列表中具有相同尺寸的数据框分组。例如，如果

a<- (df1, df2, df3, df4, df5, df6, df7)

and dim(df1) = dim (df4) = dim(df7)
and dim(df2) = dim(df3)
and dim(df5) = dim(df6)

我怎么能组合像尺寸的物体？最好将它们分组到单独的列表中？

谢谢！

（我正在使用的列表有数百个数据帧，所以这仅用于说明目的）

Answer 1

我们可以将所有数据集保存在list中。然后循环遍历list和paste the dim together, and use that to拆分the列表。

lst <- mget(paste0("df", 1:7))
v1 <- sapply(lst, function(x) paste(dim(x), collapse="."))
split(lst, v1)