Nhiều gia nhập/hợp nhất với data.tables

Question

Tôi có hai data.tables, DT và L:

> DT = data.table(x=rep(c("a","b","c"),each=3), y=c(1,3,6), v=1:9,key="x") 
> L=data.table(yv=c(1L:8L,12L),lu=c(letters[8:1],letters[12]),key="yv") 

> DT 
    x y v 
1: a 1 1 
2: a 3 2 
3: a 6 3 
4: b 1 4 
5: b 3 5 
6: b 6 6 
7: c 1 7 
8: c 3 8 
9: c 6 9 

> L 
    yv lu 
1: 1 h 
2: 2 g 
3: 3 f 
4: 4 e 
5: 5 d 
6: 6 c 
7: 7 b 
8: 8 a 
9: 12 l 

Tôi muốn độc lập tìm kiếm các giá trị tương ứng của lu từ L cho cột y và cho cột v trong DT. Cú pháp sau đây cung cấp kết quả chính xác, nhưng là cồng kềnh để tạo ra và sau đó hiểu trong nháy mắt sau:

> L[setkey(L[setkey(DT,y)],v)][,list(x,y=yv.1,v=yv,lu.1=lu.1,lu.2=lu)] 
    x y v lu.1 lu.2 
1: a 1 1 h h 
2: a 2 3 g f 
3: a 3 6 f c 
4: b 4 1 e h 
5: b 5 3 d f 
6: b 6 6 c c 
7: c 7 1 b h 
8: c 8 3 a f 
9: c 9 6 NA c 

(Sửa: gốc bài đã L[setkey(L[setkey(DT,y)],v)][,list(x,y=yv,v=yv.1,lu.1=lu,lu.2=lu.1)] trên, mà sai lẫn lộn y và v cột và nhìn tăng giá trị)

Trong SQL này sẽ được đơn giản/dễ hiểu:.

SELECT DT.*, L1.lu AS lu1, L2.lu AS lu2 
FROM DT 
LEFT JOIN L AS L1 ON DT.y = L1.yv 
LEFT JOIN L AS L2 ON DT.v = L2.yv 

có cách thanh lịch hơn để sử dụng data.table để thực hiện nhiều tham gia? Lưu ý rằng tôi đang tham gia một bảng đến một bảng khác hai lần trong ví dụ này, nhưng tôi cũng quan tâm đến việc tham gia một bảng vào nhiều bảng khác nhau.

Answer 1

Câu hỏi hay. Một mẹo là i không cần phải được khóa. Chỉ có x phải được khóa.

Có thể có những cách tốt hơn. Làm thế nào về điều này:

> cbind(L[DT[,list(y)]], L[DT[,list(v)]], DT) 
    yv lu yv lu x y v 
1: 1 h 1 h a 1 1 
2: 3 f 2 g a 3 2 
3: 6 c 3 f a 6 3 
4: 1 h 4 e b 1 4 
5: 3 f 5 d b 3 5 
6: 6 c 6 c b 6 6 
7: 1 h 7 b c 1 7 
8: 3 f 8 a c 3 8 
9: 6 c 9 NA c 6 9 

hay, để minh họa, đây là giống nhau:

> cbind(L[J(DT$y)], L[J(DT$v)], DT) 
    yv lu yv lu x y v 
1: 1 h 1 h a 1 1 
2: 3 f 2 g a 3 2 
3: 6 c 3 f a 6 3 
4: 1 h 4 e b 1 4 
5: 3 f 5 d b 3 5 
6: 6 c 6 c b 6 6 
7: 1 h 7 b c 1 7 
8: 3 f 8 a c 3 8 
9: 6 c 9 NA c 6 9 

merge cũng có thể được sử dụng, nếu các yêu cầu tính năng sau đây được thực hiện:

FR#2033 Add by.x and by.y to merge.data.table