#----------------------------------------------------------------------------#
#' @title formating numbers
#' @description Return formated string of number
#' @param digit a number defining digits
#' @param x vector
#' @param ... ...
#' @export digit2
digit2 = function(x,digit=2,...) {
n = paste0("%.",digit,"f")
sprintf(n,x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.