r - ステップ回帰から式を抽出する方法は?

Question

ステップ回帰を実行していますが、最終式を抽出して別の回帰で使用したいと考えています。

この例を使用すると:

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

これを数式オブジェクトに割り当てることができると思います：

Fertility ~ Agriculture + Education + Catholic + 
    Infant.Mortality

Answer 1

オブジェクトのメソッドをslm1使用して、オブジェクトから簡単に抽出できますformulalm

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