R/print_lm2.R

In gnbosma/hw4: Computes and Prints Linear Regression Models

#'print_lm2
#'
#'Used to print lm2 outputs
#'
#'@param m A list output generated by lm2 function
#'
#'@export

print_lm2 <- function(m){
  cat("Call: ", m$call, ' ', "Coefficients: ", sep = '\n')
  print(m$coefficients)
}