#' sci format scientifically.
#' @param x Double or Integer. Number to be properly formated.
#' @return Character. Formated number.
#' @export
sci <- function(x) format(x, big.mark = ",", decimal.mark = ".", scientific = T, digits = 2, nsmall = 2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.