如果你要在j表达式中进行复杂的操作，你可能应该使用eval和quote。在当前版本的data.table中，一个问题是eval的环境并不总是正确处理-eval and quote in data.table（注意：基于对软件包的更新，对该答案进行了更新。）-当前的修复方法是将.SD添加到eval。据我所知，从一些测试，我已经运行，这并不影响速度（的方式，例如。在j中具有.SD[1]将）。
有趣的是，这个问题只困扰j，你可以在i中正常使用eval（其中.SD无论如何都不可用）。
另一个问题是赋值，你必须有字符串。我知道一种从带引号的表达式中提取字符串名称的方法--它并不漂亮，但很有效。下面是一个将所有内容组合在一起的示例：

x = data.table(dist = c(1:10), val = c(1:10))
distcol = quote(dist)
valcol = quote(val)

x[eval(valcol) < 5,
  capture.output(str(distcol, give.head = F)) := eval(distcol)*sum(eval(distcol, .SD))]

请注意，我没有在一个eval(distcol)中添加.SD是可以的，但如果我将它从另一个eval中取出，就不会了。
另一种选择是使用get：

diststr = "dist"
valstr = "val"

x[get(valstr) < 5, c(diststr) := get(diststr)*sum(get(diststr))]

也许你已经知道这个解决方案了。

DT[[colname]]

这是受到@eddi在下面评论中的解决方案的启发，使用OP的例子：

set.seed(1)
x = data.table(a = 1:10, b=rnorm(10))
colstr="b"
col <- eval(parse(text=paste("quote(",colstr,")",sep="")))
x[eval(col)<0]
x[eval(col)<0,c(colstr):=-100]

假设变量x中有列名，可以这样做

colname = as.name(x)

然后可以在subset函数中使用colname

eval绝对不是使用动态保存的变量来子集化data.table的推荐方法。下面的示例将有所帮助：

# Toy data.table example
DT = data.table(a = c(1,2,3), b = c(4,5,6))

# Saved variable
mVar <- "a"

# Subset
DT[DT[[mVar]] < 2]

eval对复杂字符表达式非常敏感，通常不建议用于生产代码。

另一个简洁的解决方案是将列重命名为固定名称，在固定名称列上执行操作，然后重命名。避免所有不可读和不可记的代码。

setnames(dt, colname, "fixed_")
dt[,fixed_:=paste0("foo-",fixed_)]
setnames(dt, "fixed_", colname)