Eamonn Mallon
9/11/2020
oneway <- read.csv("~/Dropbox/Teaching/old_teaching/zipped/oneway.csv")
names(oneway)
[1] "ozone" "garden"
Plot the ozone data in the order it was measured
plot (1:20, oneway$ozone, ylim =c(0,8),
ylab="y", xlab="order")
Calculate the residual of each point from the mean of y
Lets look at the data separated into its levels (garden)
The means are different but are they significantly different?
Calculate the residuals from the individual means