powered by
Arthriti
str(Arthriti) attach(Arthriti) boxplot(Time~Treatmnt) anova(lm(Time~as.factor(Treatmnt))) detach(Arthriti)
Run the code above in your browser using DataLab