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))
}
PierreMasselot/cgaim documentation built on March 5, 2025, 10:18 p.m.