Nothing
#' @importFrom shiny registerInputHandler addResourcePath
#' @noRd
.onAttach <- function(libname, pkgname){
shiny::registerInputHandler("html2R.list", function(data, ...){
data
}, force = TRUE)
shiny::addResourcePath(
"wwwH2R",
system.file("www", package = "html2R")
)
if(interactive()){
packageStartupMessage(
"Tip: you can vertically resize the editors by dragging their bottom border."
)
}
}
#' @importFrom shiny removeResourcePath
#' @noRd
.onDetach <- function(libpath){
shiny::removeResourcePath("wwwH2R")
}
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.