r - 如何在循环中 cbind() 数据帧集以生成多个数据集

Question

我假设有 4 个数据集 f1,f2,i1,i2。我想 cbind() f1 与 i1 和 f2 与 i2。

我可以用

v1<-cbind(f1,i1)
v2<-cbind(f2,i2)

但我想在某种循环中执行此操作。

我知道这个问题很基础。但经过大量搜索后，我仍然无法找到解决方案。

Answer 1

我们可以使用Map来cbind两个数据集对应的列

lst <- setNames(Map(cbind, mget(ls(pattern = "^f\\d+")),
        mget(ls(pattern = "^i\\d+"))), paste0("v", seq_along(f1)))

创建数据集的列表。

数据

f1 <- data.frame(col1 = 1:5, col2 = 6:10)
f2 <- data.frame(col1 = 1:10, col2 = 11:20)
i1 <- data.frame(col3 = 11:15, col4 = 16:20)
i2 <- data.frame(col3 = 21:30, col4 = 31:40)