check.ui = function(ui, create.app=TRUE) {
if (create.app)
app = eventsApp()
app$ui = fluidPage(
ui
)
runEventsApp(app, launch.browser = rstudio::viewer)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.