#' Surround strings with quotation marks
#'
#' @param x character vector
#' @param ch character representing a quotation mark (default is double quote)
#'
#' @examples
#' str_quote(LETTERS)
#'
#' @export
str_quote <- function (x, ch = '"') {
str_c(ch, x, ch)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.