Bind Default Error Rendering into a Shiny App
Examples
if (FALSE) { # \dontrun{
server <- function(input, output, session) {
ps <- ptr_server_state("ggplot(mtcars, aes(x = var)) + geom_histogram()")
ptr_register_draw(input, ps)
ptr_register_error(output, ps)
}
} # }