Estoy tratando de usar lme
el nlme
paquete para replicar resultados de aov
ANOVA de medidas repetidas. He hecho esto para un experimento de medidas repetidas de un solo factor y para un experimento de dos factores con un factor entre sujetos y un factor dentro de los sujetos, pero tengo problemas para hacerlo para un experimento de dos factores con dos dentro -factores de los sujetos.
Un ejemplo se muestra a continuación. A
y B
son factores de efecto fijo y subject
es un factor de efecto aleatorio.
set.seed(1)
d <- data.frame(
Y = rnorm(48),
subject = factor(rep(1:12, 4)),
A = factor(rep(1:2, each=24)),
B = factor(rep(rep(1:2, each=12), 2)))
summary(aov(Y ~ A*B + Error(subject/(A*B)), data=d)) # Standard repeated measures ANOVA
library(nlme)
# Attempts:
anova(lme(Y ~ A*B, data=d, random = ~ 1 | subject)) # not same as above
anova(lme(Y ~ A*B, data=d, random = ~ 1 | subject/(A+B))) # gives error
No pude ver una explicación de esto en el libro de Pinheiro y Bates, pero puedo haberlo pasado por alto.
aov
llamada de OP es simplemente un diseño estándar de medidas repetidas, que se analizaría con lmer aslmer(Y~A*B+(1|subject))
. (Sin embargo, consulte también esta respuesta para modelos más complicados que permiten estimar la varianza y las correlaciones del efecto cross -Ss: stats.stackexchange.com/questions/13166/rs-lmer-cheat-sheet/… )