Производного имя таблицы в итоговой функции в г

Question

Я создал свою модель, используя

assign(paste("Model", MV1, sep = '') , glm(tv1 ~., family=binomial(link='logit'), 
              data=train70)) 

Теперь я хотел бы запустить функцию сводной на моем выходе. Я использовал приведенный ниже код, но вместо того, чтобы генерировать коэф. Эффективности и т. Д. Для моей модели, я получаю сводку переменной chracter. Как настроить мой код для запуска сводки для модели?

summary(paste("Model", MV1, sep = '')) 

Answer 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 = ''))) должны работать для вас.