Nothing
#' #MODULE# UI
#'
#' @param id Unique id for module instance.
#'
#' @keywords internal
#MODULE#UI <- function(id){
ns <- NS(id)
tagList(
h2("#MODULE#")
)
}
#' #MODULE# Server
#'
#' @param id Unique id for module instance.
#'
#' @keywords internal
#MODULE#_server <- function(id){
moduleServer(
id,
function(
input,
output,
session
){
ns <- session$ns
send_message <- make_send_message(session)
# your code here
}
)
}
# UI
# #MODULE#UI('id')
# server
# #MODULE#_server('id')
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.