R中合并同表头CSV文件：rbind列表遇格式问题如何解决？

你的核心问题是读取CSV时没有指定正确的分隔符：read.csv默认使用逗号(,)作为分隔符，但你的数据集用的是分号(;)，且每行末尾额外的分号会生成空列，导致读取后的数据结构异常，最终合并失败。

修正后的Base R代码 #

# 获取目录下所有csv文件
files  <- list.files(pattern = '\\.csv')

# 批量读取文件，指定分号分隔并处理空列
tables <- lapply(files, function(file) {
  # 读取文件，设置分号分隔符，保留表头
  df <- read.csv(file, header = TRUE, sep = ";", stringsAsFactors = FALSE)
  # 移除末尾由多余分号生成的全空列
  df <- df[, colSums(is.na(df)) != nrow(df)]
  return(df)
})

# 合并所有数据框
combined.df <- do.call(rbind, tables)

# 查看合并后的数据结构
str(combined.df)

# 导出合并后的csv文件（同样用分号分隔）
write.csv(combined.df, "combined_data.csv", row.names = FALSE, sep = ";")

关键说明 #

• sep = ";"：强制R使用分号解析字段，匹配你的CSV格式
• 移除空列：每行结尾的分号会让R解析出一个全为空值的列，通过colSums(is.na(df)) != nrow(df)筛选出有效列
• 确保所有CSV文件的表头完全一致，否则rbind会报错或生成NA值

更简洁的tidyverse方案（可选） #

如果你习惯使用tidyverse工具链，可以用以下代码：

library(tidyverse)

# 批量读取+合并
combined.df <- list.files(pattern = '\\.csv') %>%
  map_dfr(~ read_delim(.x, delim = ";", trim_ws = TRUE) %>% select(-last_col()))

# 导出结果
write_delim(combined.df, "combined_data.csv", delim = ";")

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