if (FALSE) {
data(warlpiri)
require(lme4)
require(lmerTest)
require(optimx)
warlpiri.lmer = glmer(CaseMarking ~ WordOrder * AgeGroup + 
  AnimacyOfSubject + (1|Text) + (1|Speaker), 
  control=glmerControl(optimizer="optimx",optCtrl=list(method="nlminb")),
  family = "binomial", data = warlpiri)
summary(warlpiri.lmer)
}Run the code above in your browser using DataLab