如何从一步回归中提取公式？

Question

我正在进行逐步回归,我想提取最终公式,以便在另一个回归中使用它.

使用此示例:

lm1 <- lm(Fertility ~ ., data = swiss)
slm1 <- step(lm1)

我希望能够将其分配给公式对象:

Fertility ~ Agriculture + Education + Catholic + 
    Infant.Mortality

Answer 1

你可以简单地从你提取它slm1的对象使用formula的方法lm对象

formula(slm1)
Fertility ~ Agriculture + Education + Catholic + Infant.Mortality