powered by
Nicotine
str(Nicotine) attach(Nicotine) model <- lm(sales~nicotine) summary(model) detach(Nicotine) remove(model)
Run the code above in your browser using DataLab