Deutsches R-Forum

Code: Alles auswählen

head(dat_long)
  patnr Gruppe T0_SOZ_GESCHLECHT_1     T0_SOZ_TEXT_50 Messzeitpunkt Madrs
1     1   2                      2 dt                             1    19
2     1   2                      2 dt                             2     0
3     5   2                      1 dt                             1    16
4     5   2                      1 dt                             2     4
5     7   2                      2 dt                             1    19
6     7   2                      2 dt                             2    16

Code: Alles auswählen

library(lattice)
library(lme4)
lmm.1 <- lmer(Madrs ~ Messzeitpunkt  + (1 | patnr), dat_long, REML=FALSE)
#Modell mit zufällligen y-Achsenabschnitten
lmm.2 <- lmer(Madrs ~ Messzeitpunkt  + (Messzeitpunkt | patnr), dat_long, REML=FALSE)
#Modell mit zufälligen Steigungen
lmm.3 <- lmer(Madrs ~ Messzeitpunkt*Gruppe  + (Messzeitpunkt | patnr), dat_long, REML=FALSE)
#Modell mit unterschiedlichen Verläufen der Behandlungsgruppen

Code: Alles auswählen

lmm.2 <- lmer(Madrs ~ Messzeitpunkt  + (Messzeitpunkt | patnr), dat_long, REML=FALSE)
Error: number of observations (=266) <= number of random effects (=266) for term (Messzeitpunkt | patnr); the random-effects parameters and the residual variance (or scale parameter) are probably unidentifiable