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.
renderPlot(...) at shiny.R#15 (1) ───────────────────────────────────────────
── Running renderPlot(...) at shiny.R#15 (2) ─────────────────────────────────────────── ── Running
Here is an example of a simple app that uses whereami
in
the renderPlot
chunk.
# Global variables can go here
<- 200
n
# Define the UI
<- bootstrapPage(
ui numericInput('n', 'Number of obs', n),
plotOutput('plot')
)
# Define the server code
<- function(input, output) {
server $plot <- renderPlot({
outputcat_where(whereami())
hist(runif(input$n))
})
}
# Return a Shiny app object
shinyApp(ui = ui, server = server)