#' @title Add commas to a large number
#' @description Convert a number to a string, with commas every 3rd digit
#' Convert a number to a string, with commas every 3rd digit
#' @param numbers Vector of non-negative numbers (will be rounded to integers)
#' @return Character string with numbers written like \code{"7,547,085"}.
#' @examples
#' \dontrun{
#' addCommas(c(231, 91310, 2123, 9911001020, 999723285))
#' }
#' @export
#'
addCommas <-
function(numbers)
{
format(numbers, big.mark=",", scientific=FALSE, trim=TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.