R/fitted.wa.R

Defines functions `fitted.wa`

`fitted.wa` <- function(object, ...) {
  fits <- object$fitted.values
  if (!is.null(object$na.action))
    fits <- napredict(object$na.action, fits)
  fits
}
gavinsimpson/analogue documentation built on June 17, 2021, 2:37 a.m.