在data.table中访问'j`内的'by`变量

Question

如果我有一个data.table，并且我在j中执行一些函数调用，我可以访问by变量的当前值吗？

library(data.table) 
d <- data.table(x=1:10, y=c('a', 'b')) 

myfun <- function(DT) { 
    print (DT$y) 
} 


d[, myfun(.SD), by=y] 

更多情况下，我传递第二个参数（另一data.table）至myfun并希望子集的基础上y当前值。它可以用一个虚拟变量来实现，但似乎令人讨厌......

Answer 1

使用.BY - 这是by变量的列表：

d <- data.table(x=1:10, y=c('a', 'b')) 
d[, .BY[[1]], by = y] # [[1]] to access the first by variable, which is y 
         # if you had by = list(x, y) you'd do .BY[[2]] to access y 
# y V1 
#1: a a 
#2: b b 

此外，该名单被命名，所以你也可以访问它按名称：

d[, .BY$y, by = y]