#' Add class tags to the slides
#'
#' @param inverse Default \code{FALSE}
#' @param center Default \code{FALSE}
#' @param middle Default \code{FALSE}
#' @export
add_class = function(inverse = FALSE, center = FALSE, middle = FALSE) {
txt = "class:"
opts = c("inverse", "center", "middle")
selected = paste(opts[c(inverse, center, middle)], collapse = ", ")
paste(txt, selected)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.