我想在data.table
中运行回归。formula
需要动态构建。我尝试过以下方法:
x = data.table(a=1:20, b=20:1, id=1:5)
> x[,as.list(coef(lm(as.formula("a ~ b")))),by=id]
Error in eval(expr, envir, enclos) : object 'a' not found
如何指定执行评估的实际data.table的环境?
编辑:我意识到我可以做lm(a ~ b)。我需要公式是动态的,这样它就可以建立为一个字符串。动态地,我的意思是公式可以是paste0(var_1, "~", var_2)
,其中var_1 = a
和var_2 = b
这是一个我认为我们可以做得更好的解决方案:
txt = parse(text="as.list(coef(lm(a ~ b)))")
> x[,eval(txt),by=id]
id (Intercept) b
1: 1 21 -1
2: 2 21 -1
3: 3 21 -1
4: 4 21 -1
5: 5 21 -1
https://stackoverflow.com/questions/14784048
复制相似问题