rq <- function(...) {
suppressPackageStartupMessages(require(..., quietly = TRUE))
}
with_options <- function(opts, expr) {
old_opts <- options(opts)
on.exit(options(old_opts))
force(expr)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.