MathsResource.github.io | Statistics | Experimental Design

R code

y = c(18,13,12,20,23,21,14,12,9,11,17,10)
Loc = factor(rep(c("1","2","3","4"),each=3))
Type =factor(rep(c("A","B","C"),4))
summary(aov(y ~ Loc + Type))