我无法解决当lm(sformula)
执行后,它不显示分配给的字符串sformula
。我有一种感觉,这是 R 处理函数参数的通用方式,而不是特定于线性回归。
下面通过例子来说明这个问题。示例 1 有不受欢迎的 output lm(formula = sformula)
。示例 2 是我想要的输出,即lm(formula = "y~x")
.
x <- 1:10
y <- x * runif(10)
sformula <- "y~x"
## Example: 1
lm(sformula)
## Call:
## lm(formula = sformula)
## Example: 2
lm("y~x")
## Call:
## lm(formula = "y~x")
怎么样eval(call("lm", sformula))
?
lm(sformula)
#Call:
#lm(formula = sformula)
eval(call("lm", sformula))
#Call:
#lm(formula = "y~x")
一般来说有一个data
论证lm
。让我们做:
mydata <- data.frame(y = y, x = x)
eval(call("lm", sformula, quote(mydata)))
#Call:
#lm(formula = "y~x", data = mydata)
以上call()
+ eval()
组合可以替换为do.call()
:
do.call("lm", list(formula = sformula))
#Call:
#lm(formula = "y~x")
do.call("lm", list(formula = sformula, data = quote(mydata)))
#Call:
#lm(formula = "y~x", data = mydata)
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)