#Biostatistics 230

#CALCULATING A ONE-WAY ANOVA TABLE

ZAR=read.table("ZarEX10.1R.txt")
ZAR
attach(ZAR)
Y=weights

#WRONG WAY:
X=feed
anova(lm(Y~X))  

#RIGHT WAY:
X=factor(feed)
anova(lm(Y~X))

#TO INCREASE NUMBER OF
SIGNIFICANT DIGITS DO THIS:
anova(lm(Y~X),options(digits=12))