记录一下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
之后才会表现出来
网友评论