r - Rで異なるモデルごとに番号を割り当てるにはどうすればよいですか?

Question

私はまだRを学んでおり、非常に単純な問題についてアドバイスが必要です.

for (i in 1:6) {
model.i = lm(data1[,i+1] ~ data1[,"mkt"]+data1[,"riskfree"])
print(summary(model(i)))
print(anova(model(i)))
}

6 つの異なる単純な線形回帰を作成し、異なる線形回帰を異なる名前に割り当てたいと考えています。model.1、model.2、model.3 のように......

しかし、私がそこに書いたことは、私が期待したようには機能しません。よろしくお願いします。

ありがとう

Answer 1

それらをリストに入れます：

lapply((1:6), function(i) lm(data1[,i+1] ~ data1[,"mkt"]+data1[,"riskfree"]))

はるかに簡単です。