i中的子集由data.table中的变量名称设置

Max*_*Max 2 r data.table

假设我有一个data.table,其中包含在变量中指定的列名.例如,我可能用过dcast:

groups <- sample(LETTERS, 2) # i.e. I don't now the values
dt1 <- data.table(ID = rep(1:2, each = 2), group = groups, value = 3:6)
(dt2 <- dcast(dt1, ID~group, value.var = "value"))
#    ID D Q
# 1:  1 3 4
# 2:  2 5 6
Run Code Online (Sandbox Code Playgroud)

现在我想基于最后两列中的值进行子集化,例如执行以下操作:

dt2[groups[1] == 3 & groups[2] == 4]
# Empty data.table (0 rows) of 3 cols: ID,D,Q
Run Code Online (Sandbox Code Playgroud)

有一个简单的方法吗?我发现我可以用键做到这一点:

setkeyv(dt2, groups)
dt2[.(3, 4)]
#    ID D Q
# 1:  1 3 4
Run Code Online (Sandbox Code Playgroud)

但是,我如何做更精细的事情,如

dt2[groups[1] > 3 & groups[2] < 7]
Run Code Online (Sandbox Code Playgroud)

Psi*_*dom 5

你可以get用来(从?get)

按名称搜索对象

:

dt2[get(groups[1]) > 2 & get(groups[2]) == 4]
#   ID A J
#1:  1 3 4
Run Code Online (Sandbox Code Playgroud)