powered by
Pixel
str(Pixel) summary(Pixel) summary(fm1 <- lme(pixel ~ day + I(day^2), data = Pixel, random = list(DS = ~ 1, Dog = ~ day)))
Run the code above in your browser using DataLab