data(warlpiri)
library(lme4, keep.source = FALSE)
warlpiri.lmer = lmer(CaseMarking ~ WordOrder * AgeGroup +
AnimacyOfSubject + (1|Text) + (1|Speaker),
family = "binomial", data = warlpiri, method = "Laplace")
warlpiri.lmer
Run the code above in your browser using DataLab