R/topercent.R

Defines functions topercent

topercent <- function(x) {
  if (is.numeric(x)) {
    per <- paste0(as.character(round(x, digits = 4) * 100), "%")
  } else {
    per <- x
  }
  per
}
naturewillconfess/hearthstone documentation built on June 17, 2024, 1:41 p.m.