如何用R的merge函数按id左连接并避免生成.v3.x/.v3.y列

问题根源是df2和df3都包含v3列，两次merge操作时R会自动为重复列名添加.x和.y后缀以区分来源。以下是几种解决方法：

方法一：先合并df2和df3，再与df1左连接 #

先将df2和df3按id合并，把两个v3列合并为一列，再和df1做左连接：

library(dplyr)

# 合并df2和df3，合并v3列（取非NA值）
df23 <- full_join(df2, df3, by = "id") %>%
  mutate(v3 = coalesce(v3.x, v3.y)) %>%
  select(id, v3)

# 与df1左连接
final_df <- merge(df1, df23, by = "id", all.x = TRUE)
print(final_df)

方法二：Base R处理合并后的重复列 #

按你原有的步骤完成两次merge后，手动合并v3.x和v3.y列：

# 原合并步骤
df1 <- merge(df1, df2, by="id", all.x = TRUE)
df1 <- merge(df1, df3, by="id", all.x = TRUE)

# 合并v3.x和v3.y为单一v3列
df1$v3 <- ifelse(is.na(df1$v3.x), df1$v3.y, df1$v3.x)
# 删除多余的v3.x和v3.y列
df1 <- df1[, c("id", "v1", "v2", "v3")]
print(df1)

方法三：用Reduce批量合并多个数据框 #

如果需要合并更多包含v3列的数据框，可以用Reduce函数自动处理重复列：

library(dplyr)

# 定义自定义合并函数
merge_v3 <- function(x, y) {
  merged <- merge(x, y, by = "id", all.x = TRUE)
  # 检查是否存在重复的v3列，合并为一列
  if (all(c("v3.x", "v3.y") %in% colnames(merged))) {
    merged$v3 <- coalesce(merged$v3.x, merged$v3.y)
    merged <- merged[, !colnames(merged) %in% c("v3.x", "v3.y")]
  }
  return(merged)
}

# 批量合并df1、df2、df3
final_df <- Reduce(merge_v3, list(df1, df2, df3))
print(final_df)

以上三种方法都能得到你预期的结果：

id  v1 v2 v3
1  1 200  5 15
2  2 300  6  2
3  3 400  7 17
4  4 500  8  5
5  5 600 12 NA
6  6 200 44 NA

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