Nothing
stats.ui <- function() {
div(
div(class="span6",
h3("Protein IDs and peptide-spectrum matches ranked by expectation value"),
uiOutput("protExpectUI")
),
div(class="span6",
h3("Density curves of matches by score according to spectra charges"),
uiOutput("chargeDisUI")#, # reactive UI of the distributions by charge
)
) #/ end encompassing div
}
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.