load.model <- function () { list(name="glmer.LOGLIN.E.Tf", glmer.formula=formula("dead~1+Tf+logD+(1+logD|species.id)+(1|plot.species.id)+sumBn+sumTnBn")) }