Nothing
shinyUI(
navbarPage(
"Shiny Test App",
tabPanel("Plots", sidebarLayout(
# Sidebar with a slider input
sidebarPanel(
checkboxGroupInput("ctrlSelect", "Select controls required:",
setNames(1:4, c("selectInput",
"numericInput",
"dateRangeInput",
"sliderInput")))
, uiOutput("reqcontrols")
, width = 3
)
, mainPanel(
uiOutput("reqplots")
, width = 9
)
)
),
tabPanel("About",
"A simple shiny app to illustrate testing as part of the
RSelenium package.")
)
)
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.