#' String functions
#'
#' @param x A string
#'
#' @export
#'
str_add_space <- function(x) gsub(pattern = "([a-z])([A-Z])", replacement = "\\1 \\2", x = x)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.