Page History

...

require(stats)

lm_test <- lm(rating ~ complaints, data=attitude)

print(summary(lm_test))

print(hi)

Then hit enter. Please save the output as a txt file and upload to Stellar. The first two lines of your output should look like:

...