powered by
Nfldraf2
str(Nfldraf2) attach(Nfldraf2) plot(forty,Rating) model <- lm(Rating~forty) abline(model) anova(model) summary(model) detach(Nfldraf2)
Run the code above in your browser using DataLab