##----------------------------------------------------------------------------##
## Tab: About.
##----------------------------------------------------------------------------##
tab_about <- tabItem(
tabName = "about",
fluidPage(
fluidRow(
column(12,
titlePanel("About this application"),
htmlOutput("about"),
uiOutput("preferences"),
actionButton("browser", "browser"),
tags$script("$('#browser').hide();")
)
)
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.