R/print.lfactor.R

Defines functions print.lfactor

#' @method print lfactor
#' @export
print.lfactor <- function(x, ...) {
  xi <- x
  attr(xi,"llevels") <- NULL
  print.factor(xi)
  cat("Numeric levels:", llevels(x), "\n")
}
pdbailey0/lfactors documentation built on May 24, 2019, 11:40 p.m.