R/extractIC.R

In mpr: Multi-Parameter Regression (MPR)

Defines functions extractIC

Documented in extractIC

extractIC <-
function(object, aic=TRUE){
   if(aic){
      ic <- object$model$aic
   }else{
      ic <- object$model$bic
   }
   ic
}

Try the mpr package in your browser