记录一下go button的作用
histo <- eventReactive(input$gobutton,{
ggplot(faithful, aes(eruptions))+
geom_histogram(bins = as.numeric(input$n_breaks))
})
简单来说，就是eventReactive里面，先加一个input$gobutton，起到隔离的作用
还有一个是observeEvent功能，应该就是某个事件发生后触发的事情，例如：
observeEvent(input$plot1_dblclick, {
brush <- input$plot1_brush
if (!is.null(brush)) {
ranges$x <- c(brush$xmin, brush$xmax)
ranges$y <- c(brush$ymin, brush$ymax)
} else {
ranges$x <- NULL
ranges$y <- NULL
}
})
就是{}中的事件，在双击即input$plot1_dbclick之后才会表现出来
