R/pred_linreg.R

In JS2387/Group8LinearRegressionFJ: Runs regression and fits linear models

#' @title Generic Method for pred()
#' @param object input containing model data
#' @param ... additional input to pred function
#' @export
pred <- function(object, ...) UseMethod("pred")

#' @title linreg method for pred()
#' @param object input of the class \code{linreg} containing model data
#' @param ... additional input to pred function
#' @export
pred.linreg <- function(object, ...) {
                        as.vector(object$Fittedvalues)
}