inst/examples/actionbutton/server.R

shinyServer(function(input, output) {
  output$plot <- reactivePlot(function() {
    input$button1
    hist(rnorm(20))
  })
})
rstudio/shiny-incubator documentation built on May 28, 2019, 7:53 a.m.