R/resid.R

In Suhani8884/Lab4: A Linear Regression package in R

#' This contains the residuals of linreg function.
#' 
#' 
#' @param x An object of linreg class
#' @param ... Further arguments passed to or from other methods
#' @export

resid.linreg = function(x,...){
  if(length(x$residuals)){
    print.default(as.vector(x$residuals))
  } else {cat("regression not available \n")}
}