r - Rの「step」メソッドで選択した変数を取得します

Question

「ステップ」関数を使用して、データから不要な/偽の変数を削除しています。私は次のコードを使用しています：

  state.x77
  st = as.data.frame(state.x77)
  colnames(st)[4] = "Life.Exp"         # no spaces in variable names, please
  colnames(st)[6] = "HS.Grad"
  model1 = lm(Life.Exp ~ Population + Income + Illiteracy + Murder +
                +                        HS.Grad + Frost + Area, data=st)
  summary(model1)
  modelStep = step(model1, direction="backward")

「step」メソッドによって選択された最終変数を知るにはどうすればよいですか?

編集：私は同じものを見つけるために以下を使用しています。他の簡単な方法を探しています。

rownames(summary(modelStep)$coefficients)