通过循环优化R脚本

时间:2017-07-08 02:44:11

标签: for-loop

如何循环以下脚本,基本上,它是重复的,但我是newbe并尝试了很多次并且失败了。您的帮助将真正受到赞赏。很多

fit1< -lm(Y1~X1 + X2 + X3 + X4,数据=测试) 步骤1< -stepAIC(FIT1) 第一步$ ANOVA 打印(步骤1) 摘要(步骤1)$ r.squared

fit2< -lm(Y2~X1 + X2 + X3 + X4,数据=测试) 步骤2< -stepAIC(FIT2) 第二步$ ANOVA 打印(步骤2)

fit3< -lm(Y3~X1 + X2 + X3 + X4,数据=测试) 步骤3< -stepAIC(FIT3) 第三步:$ ANOVA 打印(步骤3)

fit4< -lm(Y4~X1 + X2 + X3 + X4,数据=测试) 步骤4< -stepAIC(FIT4) 第四步:$ ANOVA 打印(步骤4)

fit5< -lm(Y5~x1 + x2 + x3 + x4,data = test) 步骤5< -stepAIC(FIT5) STEP5 $ ANOVA 打印(步骤5)

fit6< -lm(Y6~X1 + X2 + X3 + X4,数据=测试) 步骤6< -stepAIC(fit6) 步骤6 $ ANOVA 打印(步骤6)

fit7< -lm(Y7~X1 + X2 + X3 + X4,数据=测试) STEP7< -stepAIC(fit7) STEP7 $ ANOVA 打印(STEP7)

fit8< -lm(Y8~X1 + X2 + X3 + X4,数据=测试) 步骤8< -stepAIC(fit8) 第八步$ ANOVA 打印(步骤8)

fit9< -lm(Y9~X1​​ + X2 + X3 + X4,数据=测试) STEP9< -stepAIC(fit9) STEP9 $ ANOVA 打印(STEP9)

fit10< -lm(Y10~X1 + X2 + X3 + X4,数据=测试) 步骤10< -stepAIC(fit10) 步骤10 $ ANOVA 打印(步骤10)

fit11< -lm(Y11~X1 + X2 + X3 + X4,数据=测试) 步骤11< -stepAIC(fit11) 步骤11 $ ANOVA 打印(步骤11)

fit12< -lm(Y12~X1 + X2 + X3 + X4,数据=测试) 步骤12< -stepAIC(fit12) 步骤12 $ ANOVA 打印(步骤12)

fit13< -lm(Y13~X1 + X2 + X3 + X4,数据=测试) 步骤13< -stepAIC(fit13) 步骤13 $ ANOVA 打印(步骤13)

fit14< -lm(Y14~X1 + X2 + X3 + X4,数据=测试) 步骤14< -stepAIC(fit14) 步骤14 $ ANOVA 打印(步骤14)

fit15< -lm(Y15~X1 + X2 + X3 + X4,数据=测试) 步骤15< -stepAIC(fit15) 步骤15 $ ANOVA 打印(步骤15)

fit16< -lm(Y16~X1 + X2 + X3 + X4,数据=测试) 步骤16< -stepAIC(fit16) 步骤16 $ ANOVA 打印(步骤16) fit17< -lm(Y17~X1 + X2 + X3 + X4,数据=测试) 步骤17< -stepAIC(fit17) 步骤17 $ ANOVA 打印(步骤17)

fit18< -lm(Y18~X1 + X2 + X3 + X4,数据=测试) 步骤18< -stepAIC(fit18) 步骤18 $ ANOVA 打印(步骤18)

0 个答案:

没有答案