powered by
Data for Exercise 2.3, 2.39, and 2.54
Register
A data frame/tibble with nine observations on two variables
age of cash register (in years)
maintenance cost of cash register (in dollars)
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
plot(cost ~ age, data = Register) model <- lm(cost ~ age, data = Register) abline(model, col = "red") predict(model, newdata = data.frame(age = c(5, 10))) plot(model, which = 1) rm(model)
Run the code above in your browser using DataLab