R/print.R

#'@export
print.smvcir<-function(model,...){
  cat("Call: \n")
  print(model$call)
  print(model$summary1)
  cat("\nDimensionality Test P-Values\n")
  print(model$pvalmat)
}
danno11/SMVCIR documentation built on May 14, 2019, 6:06 p.m.