使用dplyr中mutate()函数时遇「无法转换含重复名的数据框」错误求助

1. 定位问题根源 #

报错Can't transform a data frame with duplicate names明确指向数据框EVS_recode存在重复列名，这是导致mutate_at失效的直接原因。

2. 验证重复列名 #

运行以下代码检查列名重复情况：

# 查看所有列名
names(EVS_recode)

# 检测是否存在重复列名，返回值>0则说明有重复
anyDuplicated(names(EVS_recode))

3. 修复重复列名 #

如果确认有重复列，重命名重复列以确保唯一性，示例代码：

# 给重复列添加后缀区分
dup_cols <- duplicated(names(EVS_recode))
names(EVS_recode)[dup_cols] <- paste0(names(EVS_recode)[dup_cols], "_duplicate")

或者使用dplyr::rename()手动指定新列名：

EVS_recode <- EVS_recode %>% rename(C001_dup = C001) # 假设C001是重复列，根据实际情况调整

4. 优化原代码（可选） #

原代码多次调用mutate_at可以合并为一次操作，提升效率同时减少出错概率：

# 合并重编码和NA替换
EVS_recode <- EVS_recode %>%
  mutate(C001 = recode(C001, '1' = 5, '2' = 4)) %>%
  mutate(C001 = case_when(
    C001 %in% c(-1, -2, -4, -5) ~ NA_real_,
    TRUE ~ C001
  ))

或者用管道嵌套na_if：

EVS_recode <- EVS_recode %>%
  mutate(C001 = recode(C001, '1' = 5, '2' = 4)) %>%
  mutate(C001 = na_if(C001, -1) %>% na_if(-2) %>% na_if(-4) %>% na_if(-5))

可能的原因分析 #

昨日代码正常运行说明当时数据框无重复列名，今日报错大概率是以下情况：

• 重新加载的数据文件本身包含重复列
• 运行其他预处理代码时不小心添加了重复列
• 之前的操作中对数据框进行了合并、复制列等操作导致列名重复

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