如何合并嵌套列表中的多个数据框？遇到full_join类型不兼容错误

错误原因很明确：Corruption列在不同数据框中类型不一致（一个是数值型<double>，一个是字符型<character>），而full_join默认会用所有公共列作为连接键，类型不匹配就会触发这个报错。

解决步骤 #

1. 统一目标列的数据类型：先把所有数据框中的Corruption列转换成相同类型，再执行合并。
   • 如果该列应该是数值型：将所有数据框的该列转为numeric（注意无法转换的字符会自动转为NA，若已完成数据清洗可忽略此问题）
   • 如果该列是字符型：统一转为character即可

修改后的代码 #

# 合并公共列所用代码：
common_cols <- Reduce(intersect, list(colnames(df_2015), colnames(df_2016),colnames(df_2017),
                                 colnames(df_2018),colnames(df_2019),colnames(df_2020),
                                 colnames(df_2021),colnames(df_2022)))

files <- list(df_2015[common_cols],df_2016[common_cols], df_2017[common_cols], df_2018[common_cols],
            df_2019[common_cols],df_2020[common_cols],df_2021[common_cols],df_2022[common_cols])

# 统一Corruption列的类型（这里以转为数值型为例，根据实际需求调整）
files <- lapply(files, function(df) {
  df$Corruption <- as.numeric(df$Corruption)
  return(df)
})

# 执行合并
files <- Reduce(full_join, files)

额外检查（可选） #

如果不确定哪些列还存在类型不一致的情况，可以先遍历所有数据框，查看公共列的类型：

# 查看每个数据框中所有公共列的类型
lapply(files, function(df) sapply(df, class))

这样能快速定位其他可能存在类型不匹配的列，提前处理。

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