如果我理解正确,默认情况下data.table
通过比较设置为键并具有相同名称的列来合并两个表。如果我有不同列名的表,我该怎么写?例如:
set.seed(123)
DT1<-data.table(col1=sample(letters,5,replace=TRUE),col2=sample(LETTERS[1:5],5,replace=TRUE),col3=sample(1:2,5,replace=TRUE))
DT2<-data.table(col4=sample(1:3,10,replace=TRUE),col5=sample(LETTERS[1:5],10,replace=TRUE),col6=sample(1:100,10,replace=TRUE))
(DT1)
(DT2)
> (DT1)
col1 col2 col3
1: h A 2
2: u C 1
3: k E 2
4: w C 2
5: y C 1
> (DT2)
col4 col5 col6
1: 3 D 48
2: 1 C 76
3: 1 C 22
4: 1 B 32
5: 3 A 24
6: 3 E 15
7: 3 E 42
8: 2 D 42
9: 3 D 37
10: 2 A 16
我应该在DT1[
写一下合并,只选择col2 == col5&amp;的行。 COL3 == COL4?
这是预期的输出:
col1 col2 col3 col4 col5 col6
h A 2 2 A 16
u C 1 1 C 76
u C 1 1 C 22
y C 1 1 C 76
y C 1 1 C 22
提前致谢!
答案 0 :(得分:21)
使用data.table的基于子集的连接以及最近实现的on=
参数和nomatch=0L
,这很简单:
DT2[DT1, on=c(col5="col2", col4="col3"), nomatch=0L]
有关详情,请参阅secondary indices小插图。
或者,如果您使用了data.tables键,那么您可以跳过on=
参数。但是上面的解决方案是惯用的,因为它保留了原始data.tables的顺序,很明显通过查看代码来判断正在查找哪些列。
setkey(DT1, col2, col3)
setkey(DT2, col5, col4)
DT2[DT1, nomatch=0L]
查看旧版本的历史记录。