R/residual_sd.R

Defines functions residual_sd

residual_sd <- function(object){
  r <- object$residuals
  w <- object$weights
  n <- length(r)
  sqrt(sum(w * r^2) / (n - object$edf))
}

Try the cgaim package in your browser

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

cgaim documentation built on June 30, 2025, 9:07 a.m.