R/formatNumber.R

In bonjwow/format-number: What the Package Does (One Line, Title Case)

#' Format Number
#'
#' This function formats number with decimal
#'
#' @return Formatted Number
#' @export

formatNumber <- function(numb, decimal) {
  return(format(round(as.numeric(numb), decimal), nsmall=decimal, big.mark=","))
}