如何在data.table中匹配另一表列执行paste操作并维持行序稳定

看起来你现在是想在DT1里结合DT2的数值生成拼接字符串，但因为前后的合并操作会打乱行序，所以不得不手动保存、恢复行序来保证匹配正确。其实不用这么麻烦，利用data.table的连接更新功能就能一步搞定，还能完美保留原始行序。

先把你的场景用完整代码重现一下（补全你没写完的部分）：

library(data.table)

DT1 <- data.table(ID = c("a", "b", "c"), N = c(4,1,3)) # 各ID的使用值
DT2 <- data.table(ID = c("b","a","c"), N = c(10,10, 15)) # 各ID的总值

# 你当前的做法：保存行序→排序匹配→拼接→恢复行序
DT1[, ord := .I]
DT1 <- DT1[order(ID)]
DT2 <- DT2[order(ID)]
DT1[, combined := paste(N, DT2$N, sep = "/")]
DT1 <- DT1[order(ord)]

这种方法虽然能解决问题，但步骤繁琐，还容易出错（比如忘记恢复行序，或者排序时漏了列）。推荐用data.table的连接更新来简化操作，代码更简洁，还能自动保证ID匹配，完全不用管DT2的行序：

# 一步完成：按ID匹配，直接在DT1新增拼接列，保留原始行序
DT1[DT2, on = .(ID), combined := paste(N, i.N, sep = "/")]

运行完后查看DT1，你会发现行序完全和初始一致，拼接的字符串也正确对应：

ID N combined
1:  a 4      4/10
2:  b 1      1/10
3:  c 3      3/15

为什么这个方法更好？ #

• 无需手动处理行序：data.table的x[i, on = ...]语法是按x（也就是DT1）的行序来处理的，匹配到i（DT2）中对应的ID后，直接把i的列值拿来用，完全不会改变DT1的原始顺序。
• 更安全的匹配：靠ID列精准匹配，不像手动排序那样如果两个表的ID顺序不一致（比如有缺失或新增ID）会出错。如果担心有ID不匹配的情况，还可以加nomatch = NA（默认）或者nomatch = 0来控制未匹配行的处理。
• 代码更简洁：一行代码替代原来的四行，可读性和维护性都更高。

如果你的场景中DT1和DT2的ID是一一对应的，这个方法完全可以替代你当前的行序处理方案，而且更高效。

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