0

我还在学习 R,我需要一些关于非常简单的问题的建议。

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

我想做六个不同的简单线性回归,并将不同的线性回归分配给不同的名称;比如model.1、model.2、model.3……

但是我在那里写的并没有像我预期的那样工作。我会很感激你的帮助。

谢谢

4

1 回答 1

2

将它们放在一个列表中:

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

这要容易得多。

于 2013-09-24T19:55:32.123 回答