powered by
Lifespan
str(Lifespan) attach(Lifespan) plot(heat,life) model <- lm(life~heat) model resid(model) sum((resid(model))^2) anova(model) # plot(model) # Used for diagnostic purposes detach(Lifespan)
Run the code above in your browser using DataLab