我使用
生成了我的模型assign(paste("Model", MV1, sep = '') , glm(tv1 ~., family=binomial(link='logit'),
data=train70))
现在我想在输出上运行summary函数。我使用下面的代码,而不是为我的模型生成co-efficents等我得到了一个chracter变量的摘要。如何调整代码以运行模型的摘要?
summary(paste("Model", MV1, sep = ''))
答案 0 :(得分:1)
您可以使用get
功能,它可以帮助您使用角色名称评估对象。这是一个玩具示例:
x <- 1:10
y <- x + rnorm(10)
assign("model", lm(y ~ x))
summary(get("model"))
Call:
lm(formula = y ~ x)
Residuals:
Min 1Q Median 3Q Max
-0.4863 -0.3476 -0.1218 0.2645 0.7806
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) -0.01189 0.30979 -0.038 0.97
x 0.93818 0.04993 18.791 6.65e-08 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.4535 on 8 degrees of freedom
Multiple R-squared: 0.9778, Adjusted R-squared: 0.9751
F-statistic: 353.1 on 1 and 8 DF, p-value: 6.646e-08
因此,对于您的情况,summary(get(paste("Model", MV1, sep = '')))
应该适合您。