powered by
Register
str(Register) attach(Register) plot(age,cost,main="Exercise 2.3") model <- lm(cost~age) abline(model) plot(age,resid(model)) detach(Register)
Run the code above in your browser using DataLab