#' @title Generic Method for resid()
#' @param object input containing model data
#' @param ... other inputs to the resid function
#' @export
resid <- function(object, ...) UseMethod("resid")
#' @title linreg method for resid()
#' @param object input of the class \code{linreg} containing model data
#' @param ... other inputs to the resid function
#' @export
resid.linreg <- function(object, ...) {
as.vector(object$Residuals)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.