search erro intra

R/analysis/model.lmer/model.lmer.LOGLIN.ER.AD.Tf.r.ecocode.species.R

 load.model <- function () {
     list(name="lmer.LOGLIN.ER.AD.Tf.r.ecocode.species",
-         var.BLUP = 'set.id',
+         var.BLUP = 'ecocode.id',
          lmer.formula.tree.id=formula("logG~1+Tf+logD+sumBn+sumTfBn+sumTnBn+sumTnTfBn.abs +(1+logD+sumBn||species.id)+(1|plot.id)+(1+Tf+sumBn+sumTfBn+sumTnBn+sumTnTfBn.abs||ecocode.id)"))
 }