#' Trim whitespace
#'
#' @param x string or vector of strings
#' @return a string or vector of strings, with whitespace removed.
#' @export
trim_whitespace <- function (x) gsub("^\\s+|\\s+$", "", x)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.