R/print.SII.R

`print.SII` <-
function (x, digits=3, ...) 
{
  cat("\n")
  cat("SII:", round(x$sii, digits), "\n")
  cat("\n")  
}
warnes/SII documentation built on June 21, 2019, 10:51 p.m.