#' A function that uses functions from all standard
#' (=loaded by default) R packages
#'
#' To see if R CMD check gives warnings for them.
#'
#' @export
#' @examples
#' naughty_function()
naughty_function <- function() {
## base
abs(10)
## stats
density(1:10)
## graphics
if (FALSE) plot(1:10)
## grDevices
gray(.1)
## utils
if (FALSE) emacs(42)
## datasets
volcano
## methods
isClass("42")
"Very naughty!"
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.