如何简便地将包含42个tibble的列表合并为单个tibble？

嗨，我刚好能帮你解决这个麻烦！手动写42次full_join确实太繁琐了，用tidyverse里的工具就能轻松搞定批量合并的需求，下面给你两种实用的方案：

方案1：用purrr::reduce()（推荐，tidyverse风格） #

首先确保你已经加载了tidyverse包（它包含purrr和tibble，不用单独加载多个包）：

# 未安装的话先执行安装
install.packages("tidyverse")
# 加载包
library(tidyverse)

接下来只用一行代码就能完成所有tibble的全连接：

# 假设你的tibble列表名为my_tibble_list
combined_tibble <- reduce(my_tibble_list, full_join)

reduce()函数会自动遍历你的列表，依次把每个tibble和之前合并的结果做full_join，效果完全等同于你手动写一长串连接代码，但效率高太多。

如果你的tibble需要指定特定连接键（比如只按id列合并，而不是所有同名列），可以这样写：

combined_tibble <- reduce(my_tibble_list, ~full_join(.x, .y, by = "id"))

方案2：用base R的Reduce() #

如果你不想加载额外的包，base R自带的Reduce()也能实现相同功能：

# 确保加载了dplyr（因为full_join来自dplyr）
library(dplyr)
combined_tibble <- Reduce(full_join, my_tibble_list)

同样，指定连接键的写法是：

combined_tibble <- Reduce(function(x, y) full_join(x, y, by = "id"), my_tibble_list)

这两种方法都能帮你省去重复写代码的麻烦，选你习惯的风格就好～

内容的提问来源于stack exchange，提问作者user18373817