# # Exercise 5.2c - continues on from Exercise 4.4 # # Statistical Methods in Biology: Design and Analysis of Experiments and Regression # by S.J. Welham, S.A. Gezan, S.J. Clark & A. Mead (2014) # Chapman & Hall/CRC Press, Boca Raton, Florida. ISBN: 978-1-4398-0878-8 # Data from J. Pell, Rothamsted Research # Version 1, 26/09/2014 # Set working directory - use setwd() function or from Session menu in RStudio # e.g. setwd("d:/stats4biol/data) # Read data transmission <- read.table("transmission.dat",sep="",header=T) summary(transmission) # One-way ANOVA transmission.aov <- aov(LogitP~Density, data=transmission) summary(transmission.aov) # default set of residual plots plot(transmission.aov, ask=FALSE) # add histogram of standardized residuals std.res <- rstandard(transmission.aov) hist(std.res) # End of file