R/print.R

In BAAQMD/qtytools: Parse, Manipulate, and Predict Quantities

#' @importFrom janitor adorn_totals
#' @method print tabulation
#' @export
print.tabulation <- function (
  x,
  totals = NULL,
  ...
) {

  if (!is.null(totals)) {
    x <- janitor::adorn_totals(x, totals)
  }

  NextMethod("print")

}