这是一个简单的测试代码:
> x=runif(10)
> y=runif(10)
> tt=paste0("y~", "x")
> fitt=lm(as.formula(tt))
> fitt$call[[2]]
as.formula(tt)
如何使最后一个命令的输出语言对象可执行,以便返回y~x公式?在Mathematica中,它是ToExpression
命令。
答案 0 :(得分:1)
我可以在这里考虑两个选项:
formula(fitt$terms) # Option 1
eval(fitt$call[[2]]) # Option 2