.par.orig <- par()
##' Restore the 'par' settings
##'
##' If you have been mucking around with parameter settings, this function
##' will revert to the parameter settings that were available when this
##' package was loaded.
##' @export
par.reset <- function() {
par(.par.orig)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.