R/bic.dof.R

In plsRglm: Partial Least Squares Regression for Generalized Linear Models

#' @rdname aic.dof
#' @aliases bic.dof
#' @export bic.dof
bic.dof <- function (RSS, n, DoF, sigmahat) 
{
  bic_temp <- RSS/n + log(n) * (DoF/n) * sigmahat^2
  return(bic_temp)
}