data(salamander)
<!-- % in test-salamander.R -->
## Not run: ------------------------------------
# # < 1 s.
# HLfit(cbind(Mate,1-Mate)~TypeF+TypeM+TypeF*TypeM+(1|Female)+(1|Male),
# family=binomial(),data=salamander,HLmethod="ML")
## ---------------------------------------------
# In this example fitme() is slower
if (spaMM.getOption("example_maxtime")>1.2) {
fitme(cbind(Mate,1-Mate)~TypeF+TypeM+TypeF*TypeM+(1|Female)+(1|Male),
family=binomial(),data=salamander)
}
Run the code above in your browser using DataLab