R/YYYY-format.R

#' @export
format.YYYY <- function (x, ...) {
  #out <- paste0(timeline(x), x)
  out <- format(unclass(x))
  out[is.na(x)] <- NA_character_
  return(out)
}
BAAQMD/yeartools documentation built on April 1, 2022, 12:24 a.m.