R/BMD_ABD.R

In fitODBOD: Modeling Over Dispersed Binomial Outcome Data Using BMD and ABD

#' @method AIC fit
#' @export
AIC.fit<-function(object,...)
{
  return(object$AIC)
}

#' @method residuals fit
#' @export
residuals.fit<-function(object,...)
{
  return(object$obs.freq-object$exp.freq)
}

#' @method fitted fit
#' @export
fitted.fit<-function(object,...)
{
  return(object$exp.freq)
}