通过引用在 data.table 中修改列表

Question

我刚刚找到了一种方法来有条件地修改data.table内的列表观察。 我认为分享可能有用。 在 data.table 中使用列列表可能是移动大量参数的一种有趣方式。 这是正确的做法吗？

dt = data.table(id = c(1,1:2), comment = list(c("a", "b"), 1,"hello"))[]

## > dt
##  id comment
## 1:  1     a,b
## 2:  1       1
## 3:  2   hello

dt[id==1,comment:=lapply(comment,function(x) c(x,"new stuff"))]

## > dt
##    id       comment
## 1:  1 a,b,new stuff
## 2:  1   1,new stuff
## 3:  2         hello

Answer 1

这可以通过Map来完成

dt[id == 1, comment := Map(c, comment, 'new stuff')]
dt
#   id       comment
#1:  1 a,b,new stuff
#2:  1   1,new stuff
#3:  2         hello