#' @export
gg_histogram <- function (data = NULL, mapping = aes(), ..., verbose = getOption("verbose")) {
gg_plot(data, mapping, verbose = verbose) +
geom_histogram(...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.