R/extractAIC.manyglm.R

Defines functions extractAIC.manyglm

extractAIC.manyglm<- function(fit, scale, k=2, ...)
{
  n.vars = NCOL(fit$y)
  ll=logLik(fit)
  edf = attr(ll,"df") * n.vars
  AIC = -2*sum(ll) + k * edf
  return( c(edf,AIC) )
  NextMethod("extractAIC")
}

Try the mvabund package in your browser

Any scripts or data that you put into this service are public.

mvabund documentation built on March 18, 2022, 7:25 p.m.