R语言合并3个无重叠行、列名未知重叠的超百列数据集

你需要的保留全部行、自动对齐同名列、缺失值统一填充NA的合并需求，无需提前识别重名列，可直接用以下两种方案实现：

方案1：dplyr包bind_rows()（推荐，适配大列数场景） #

tidyverse生态的dplyr::bind_rows()天生支持任意数量数据框的行堆叠操作，会自动匹配同名列合并，不存在的列自动填充NA，列数过百也能高效处理：

# 加载依赖包
library(dplyr)

# 示例数据
a <- data.frame(a=c(0,1,2), b=c(3,4,5), c=c(6,7,8))
b <- data.frame(a=c(9,10,11), c=c(12,13,14), d=c(15,16,17))
# 第三个数据集可同理传入
c <- data.frame(a = c(12,13), e = c(18,19), f = c(20,21))

# 一步完成合并，可传入任意数量数据集
merge_result <- bind_rows(a, b, c)

方案2：基础R实现（无需安装额外包） #

如果不能依赖第三方包，可通过补全列名后合并的逻辑实现：

# 1. 把所有待合并数据集放入列表
df_list <- list(a, b, c)
# 2. 提取所有数据集的唯一列名
all_cols <- unique(unlist(lapply(df_list, colnames)))
# 3. 给每个数据集补全所有列，缺失列赋值为NA
df_list_fill <- lapply(df_list, function(df) {
  miss_cols <- setdiff(all_cols, colnames(df))
  df[miss_cols] <- NA
  return(df)
})
# 4. 按行合并所有补全后的数据集
merge_result <- do.call(rbind, df_list_fill)

以上两种方案的输出结果都和你给出的预期格式完全一致。

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