R/forint.R

In Deborah-Jia/m_r_skills: Demo R package for the Mastering R skills class

#' Formats numbers as Hungarian Forints
#' @param x number vector
#' @return string
#' @export
#' @importFrom checkmate assert_number
#' @importFrom scales dollar
#' @examples
#' forint(45)
#' forint(10001000.213814)

forint <- function(x) {
  assert_number(x)
  dollar(x, prefix = "", suffix = " Ft")
}