R/residuals-liureg.R

Defines functions residuals.liureg

Documented in residuals.liureg

#' Liu Regression Residuals
#'
#' @param object An object of class \code{liureg}.
#' @param ... Not used in this implementation.
#'
#' @return The returned object is a vector or matrix whose columns
#' are Liu residuals for each \code{lambda}.
#' @author Murat Genç
#' @method residuals liureg
#' @export
#'
#' @seealso [liureg()], [pressliu()], [residuals()]
#'
#' @examples
#' Hitters <- na.omit(Hitters)
#' X <- model.matrix(Salary ~ ., Hitters)[, -1]
#' y <- Hitters$Salary
#' lam <- seq(0, 1, 0.01)
#' liu.mod <- liureg(X, y, lam)
#' residuals(liu.mod)
residuals.liureg <- function(object, ...){
  y <- drop(object$y)
  y <- y + object$ym
  y - predict.liureg(object)
}

Try the fastliu package in your browser

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

fastliu documentation built on May 29, 2024, 10:35 a.m.