Nothing
#' Play a sound (if possible)
#' @param sound character string or number specifying the sound (see \code{\link[beepr]{beep}})
#' @note requires the `beepr` package
play_sound <- function(sound = "fanfare") {
if ("beepr" %in% utils::installed.packages()[, 1])
beepr::beep(sound)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.