I am trying to analyse the data of the box 10.5 in the Biometry from
Sokal and Rohlf (2001) using R. This is a three-level nested anova with
equal sample size : 3 different treatments are compared ; 2 rats (coded
1 or 2) / treatment are studied ; 3 preparations (coded 1, 2 or 3) /
rats are available ; 2 readings of the glycogen content / preparations
are realised. Treatment is fixed whereas Rats (nested in Treatment) and
Prep (nested in Rats) are random effects.
According to a previous discussion found in the R-help archives (January
2007), I have tried the following formula :
box105.lme<-lme(content~treatment, box105.gd, random=~1|rats/prep)
However, the formula summary(box105.lme) gives wrong estimates for the