根据列中的条件为组分配值（从配置表中提取）

Question

我有一个data.table DT1 ，每个区域包含一个值。 在配置表DT2 ，我将每个区域的每个值映射到变量number_carrots 。

是否有一种优雅的data.table方法，可以根据DT2的映射向DT1中添加一列（ number_carrots ）？ 我只能通过循环来做到这一点...

举个例子。 DT1是：

library(data.table)
region1 = c('Europe', 'Europe', 'Africa', 'Africa', 'Europe', 'Africa')
value1  = c(1, 2, 1, 2, 3, 1)
DT1     = data.table(region1, value1)

> DT1
    region1 value1
1:  Europe      1
2:  Europe      2
3:  Africa      1
4:  Africa      2
5:  Europe      3
6:  Africa      1

DT2是：

region2         = rep(c('Europe', 'Africa'), each = 3)
value2          = c(1:3, 1:3)
number_carrots  = c(10, 20, 30, 5, 15, 30)

DT2             = data.table(region2, value2, number_carrots)

> DT2
   region2 value2 number_carrots
1:  Europe      1             10
2:  Europe      2             20
3:  Europe      3             30
4:  Africa      1              5
5:  Africa      2             15
6:  Africa      3             30

使用从DT2映射，我想向DT1添加一列number_carrots ：

> DT1
   region1 value1 number_carrots
1:  Europe      1             10
2:  Europe      2             20
3:  Africa      1              5
4:  Africa      2             15
5:  Europe      3             30
6:  Africa      1              5

Answer 1

OP已请求向DT1添加一列number_carrots 。

这可以通过更新 DT1通过引用修改DT1来解决

DT1[DT2, on = .(region1 = region2, value1 = value2), number_carrots := i.number_carrots]
DT1

  region1 value1 number_carrots 1: Europe 1 10 2: Europe 2 20 3: Africa 1 5 4: Africa 2 15 5: Europe 3 30 6: Africa 1 5