Allows pool.compare of lmer objects

    formula(fit1$analyses[[1]])
works just fine with lm and lmer