r - 使用循环合并和创建表

Question

我试图搜索如何使用循环合并和创建多个表，但找不到我要找的东西。

我有四个表:表 1.1、1.2、1.3 和表 2。

表1.1、1.2、1.3同列不同行。

表 2 与表 1.1、1.2 和 1.3 共享相同的第一列。

具体来说，表格如下所示。

表 1.1

<表类="s-表"><头>AB<正文>1一个2b3c

表 1.2

<表类="s-表"><头>AB<正文>4d5e6f

表 1.3

<表类="s-表"><头>AB<正文>7g8h9我

表2

<表类="s-表"><头>AC<正文>1x2是3Z4p5q6r7s8t9你

我想使用循环将表 1.1 与表 2、表 1.2 与表 2 以及表 1.3 与表 2 合并，以便最后有三个不同的表。

具体来说，我想得到如下。

表 1.1'

<表类="s-表"><头>ABC<正文>1一个x2b是3cz

表 1.2'

<表类="s-表"><头>ABC<正文>4dp5eq6fr

表 1.3'

<表类="s-表"><头>ABC<正文>7gs8ht9我你

获得它的最佳方法是什么？我想知道在这种情况下如何使用循环，因为我的实际数据包含表 1.1 到 1.100 和表 2，我将不得不合并 100 次并创建 100 个表。

在此先感谢您的帮助!

Answer 1

我们可以在将'table1.1'、'table1.2'、'table1.3'...放入列表后使用lapply(使用mget) 遍历 list，然后使用 base R 中的 merge 进行内部连接并返回一个 列表

lst1 <- mget(paste0("table1.", 1:100))
# or if there is space in the object names
# lst1 <- mget(paste0("table 1.", 1:100))
lst2 <- lapply(lst1, function(x) merge(x, table2))