两模型比较:
anova()函数:可以比较两个嵌套模型的拟合优度。
fit1<-lm(Murder~Population+Illiteracy+Income+Frost,data=states)
fit2<-lm(Murder~Population+Illiteracy,data=states)
anova(fit2,fit1)
结论:p=0.994,不显著,不需要将Income和Frost添加到线性模型中。
AIC()函数:考虑了模型的统计拟合度遗迹用来拟合的参数数目。
fit1<-lm(Murder~Population+Illiteracy+Income+Frost,data=states)
fit2<-lm(Murder~Population+Illiteracy,data=states)
AIC(fit2,fit1)