data.table使用常量更新連接

Question

我想根據連接和固定值更新data.table中行的子集。

d1 <- data.table(A = 5:1, B = letters[5:1])  
d2 <- data.table(C = letters[5:1], Z = 6:10) 
current.val <- 5 

我想要做的是更新d1基於與d2的連接，但只有在d1中的A = 5的地方。是這樣的：

d1[d2, D := i.Z ,on=.(B==C, A==current.val)] 

我目前的做法是增加一個新的列到D2，並將其設置爲固定值，並使用在連接：

d2[, current.val := 5] 
d1[d2, D := i.Z ,on=.(B==C, A==current.val)] 

這工作，但看起來像一個很多開銷。有一種更簡單的方法來在連接中使用常量值嗎？

---

（8/14）爲基準的新尺度範例：

d1 <- data.table(A = 100:1, B = 100000000:1, D = as.numeric(NA), key = c("A", "B")) 
d2 <- data.table(C = 100000000:1, Z = c(10:1)/10, key = "C") 
current.val <- 5 

system.time(d1[cbind(d2, A = current.val), on = .(B = C, A), D := i.Z]) 
system.time({setkey(d1, B, A); d1[d1[d2][A == current.val], D := Z]; setkey(d1, A, B)}) 
system.time(d1[d1[d2][A == current.val], D := Z]) # fastest, if inverse key order is acceptable 

Answer 1

我目前的做法是增加一個新的列到D2，並將其設置爲固定值，並且使用在join [...]有沒有更簡單的方法在連接中使用常量值？

這是一個好方法。另外，還可以添加一列臨時裏面有cbind加入：

d1[cbind(d2, A = current.val), on=.(B = C, A), D := i.Z ] 

其實，c作品代替cbind這裏，但我覺得這是一個怪異的做法。

Answer 2

對於剛剛五個行，它不會有任何區別，但如果你想擴大規模，則該操作會快很多，如果你對d1和d2設置鍵：

d1 <- data.table(A=5:1, B=letters[5:1], key="B") 
d2 <- data.table(C=letters[5:1], Z=6:10, key="C") 

下面的結構然後會給出想要的結果：

d1[d1[d2][A==current.val], D := Z]