合并具有不同列名的表

时间:2013-04-16 21:15:54

标签: r merge data.table

如果我理解正确,默认情况下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

提前致谢!

1 个答案:

答案 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]

查看旧版本的历史记录。