Nicotine content versus sales for eight major brands of cigarettes
Data for Exercise 9.21
Nicotine
A data frame/tibble with eight observations on two variables
nicotine content (in milligrams)
sales figures (in $100,000)
Kitchens, L. J. (2003) Basic Statistics and Data Analysis. Pacific Grove, CA: Brooks/Cole, a division of Thomson Learning.
model <- lm(sales ~ nicotine, data = Nicotine)
plot(sales ~ nicotine, data = Nicotine)
abline(model, col = "red")
summary(model)
predict(model, newdata = data.frame(nicotine = 1),
interval = "confidence", level = 0.99)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.