Nothing
.onAttach <- function(libname, pkgname) {
packageStartupMessage(
"Welcome to depigner: we are here to un-stress you!"
)
}
.onLoad <- function(libname, pkgname) {
op <- options()
op_depigner <- list(
depigner.dev.test_telegram_bot = FALSE,
depigner.bot_name = NULL,
depigner.chat_id = NULL
)
toset <- !(names(op_depigner) %in% names(op))
if (any(toset)) options(op_depigner[toset])
invisible(TRUE)
}
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.