shinyUI(basicPage(
h1("Achievable sensitivity and specificity"),
numericInput("prevalence", label = "prevalence",
value=0.5, min = 0, max=1, step = 0.05),
plotOutput("contraBayesPlot", hover="contraBayesPlot_hover"),
tableOutput("parameterTable")
))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.