从`lm` fit

时间:2016-03-19 00:26:08

标签: r lm

这是一个简单的测试代码:

> 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命令。

1 个答案:

答案 0 :(得分:1)

我可以在这里考虑两个选项:

formula(fitt$terms) # Option 1
eval(fitt$call[[2]]) # Option 2