如何基于相同行值匹配合并两个不同长度的R数据集并新增列

你需要的是按公共列值做左向匹配，保留长表（数据集a）的所有行，填入短表（数据集b）的对应值，以下是两种常用实现方案：

方法1：基础R实现（无需安装额外包） #

直接用内置的match()函数完成匹配，适合轻量场景：

# 构造示例数据
a <- matrix(c(1,2,1,4,1,6,1,8,2,10,2,12,2,14,2,16), byrow=TRUE, nrow=8)
b <- matrix (c(1,100, 2, 200), byrow=TRUE, nrow=2)

# 按a的第一列匹配b的第一列，取出b对应第二列的值
match_idx <- match(a[,1], b[,1])
new_col <- b[match_idx, 2]

# 合并新列到原a矩阵，最终行数和a完全一致
a_with_new_col <- cbind(a, new_col)

运行后a_with_new_col的第三列即为预期结果：所有V1=1的行对应值为100，V1=2的行对应值为200。

方法2：dplyr包实现（更适合复杂匹配场景） #

如果后续有更复杂的多列匹配、数据清洗需求，用tidyverse生态的左连接逻辑更易维护：

library(dplyr)

# 矩阵转数据框并设置匹配关联列名
df_a <- as.data.frame(a)
df_b <- as.data.frame(b) %>% rename(match_col = V1, fill_col = V2)

# 左连接：保留df_a的全部行，按第一列匹配填充值
result <- left_join(df_a, df_b, by = c("V1" = "match_col"))

# 若需要转回矩阵格式，执行以下代码即可
# result_matrix <- as.matrix(result)

注意事项 #

如果数据集a中存在b没有的V1值，对应新列的位置会自动填充为NA，符合常规数据合并逻辑。

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