#' Directly setUI , also works for hidden UI
#' @export
dsetUI = function(id, ui, selector = paste0("#",id, collapse=", "), app=getApp(),...) {
restore.point("dsetUI")
html = as.character(ui)
try(app$session$sendCustomMessage(type = 'shinyEventsSetInnerHTML',message = list(selector=selector, html=html)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.