Nothing
knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(whereami)
Using whereami
with shiny is simple. Place cat_where(whereami())
anywhere in a shiny command and every time the rendering application hits the line it will print to console indicating which line has been hit accompanied by a counter.
── Running renderPlot(...) at shiny.R#15 (1) ─────────────────────────────────────────── ── Running renderPlot(...) at shiny.R#15 (2) ───────────────────────────────────────────
Here is an example of a simple app that uses whereami
in the renderPlot
chunk.
# Global variables can go here n <- 200 # Define the UI ui <- bootstrapPage( numericInput('n', 'Number of obs', n), plotOutput('plot') ) # Define the server code server <- function(input, output) { output$plot <- renderPlot({ cat_where(whereami()) hist(runif(input$n)) }) } # Return a Shiny app object shinyApp(ui = ui, server = server)
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.