Nothing
clean_output <- function(output){
output$res_tab <- reactive(NULL)
output$res_lik <- reactive(NULL)
output$heatmap <- reactive(NULL)
output$boxplot <- reactive(NULL)
output$downloadHM <- reactive(NULL)
output$downloadBP <- reactive(NULL)
output$res_var <- reactive(NULL)
output$res_error <- reactive(NULL)
}
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.