在 r 中的摘要函数中派生 table 名称
Derived table name in summary function in r
我已经使用
生成了我的模型
assign(paste("Model", MV1, sep = '') , glm(tv1 ~., family=binomial(link='logit'),
data=train70))
现在我想 运行 在我的输出中使用汇总函数。我使用了下面的代码,而不是为我的模型生成协同效应等,我得到了一个字符变量的摘要。如何将我的代码调整为 运行 模型的摘要?
summary(paste("Model", MV1, sep = ''))
您可以使用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 = '')))
应该适合您。
我已经使用
生成了我的模型assign(paste("Model", MV1, sep = '') , glm(tv1 ~., family=binomial(link='logit'),
data=train70))
现在我想 运行 在我的输出中使用汇总函数。我使用了下面的代码,而不是为我的模型生成协同效应等,我得到了一个字符变量的摘要。如何将我的代码调整为 运行 模型的摘要?
summary(paste("Model", MV1, sep = ''))
您可以使用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 = '')))
应该适合您。