在R语言中基于指定列合并多行单列无序数据集的方法咨询

嘿，我来帮你搞定这个合并数据集的问题！你现在有三个结构相似的数据集，每个都包含标识符列和数值列，只是行的顺序不一样，想要把它们按标识符列合并，同时保留第一个数据集的行顺序对吧？下面给你两种R语言里常用的实现方法，你可以按需选择：

方法一：使用Base R的merge()函数 #

首先我们先把你给出的示例数据转换成可运行的R数据框：

# 创建示例数据集
df1 <- data.frame(id = c("X", "B", "Y", "D", "Z"), value1 = c(7, 5, 2, 1, 0))
df2 <- data.frame(id = c("D", "Z", "X", "Y", "B"), value2 = c(7, 5, 2, 6, 7))
df3 <- data.frame(id = c("Y", "D", "Z", "B", "X"), value3 = c(4, 4, 8, 7, 2))

接下来通过多次merge()完成合并，最后调整行顺序匹配第一个数据集：

# 逐步合并三个数据集
merged_result <- merge(df1, df2, by = "id")
merged_result <- merge(merged_result, df3, by = "id")

# 调整行顺序，与df1的id顺序一致
merged_result <- merged_result[match(df1$id, merged_result$id), ]

# 查看结果
print(merged_result)

运行后你会得到想要的结果：

id value1 value2 value3
1  X      7      2      2
2  B      5      7      7
3  Y      2      6      4
4  D      1      7      4
5  Z      0      5      8

方法二：使用dplyr包的连接函数（更适合tidyverse用户） #

如果你习惯用tidyverse生态的工具，dplyr的inner_join()会让合并逻辑更清晰：

首先加载dplyr包（如果没安装先运行install.packages("dplyr")）：

library(dplyr)

然后通过管道操作完成合并和排序：

merged_result <- df1 %>%
  inner_join(df2, by = "id") %>%
  inner_join(df3, by = "id") %>%
  arrange(match(id, df1$id))

# 查看结果
print(merged_result)

这个方法和base R的效果完全一致，只是写法更简洁流畅。

需要注意的是：因为你的三个数据集的标识符列（id）是完全匹配的，所以用inner_join()或者merge()都不会丢失数据；如果后续遇到某个数据集缺少部分标识符的情况，可以换成left_join()来保留所有第一个数据集的行。

备注：内容来源于stack exchange，提问作者Reda