有没有办法使sliderInput http://shiny.rstudio.com/reference/shiny/latest/sliderInput.html等待几秒钟，然后它会更改其对应的input$多变的？我有一个栏正在控制需要根据值变化重新渲染的图表。我知道使用提交按钮的解决方法，我希望避免需要它。
debounce就是为此而设计的，而且更简单。修改之前的回答者的代码：
library(shiny)
library(magrittr)
shinyApp(
server = function(input, output, session) {
d_mean <- reactive({
input$mean
}) %>% debounce(1000)
output$plot <- renderPlot({
x <- rnorm(n=1000, mean=d_mean(), sd=1)
plot(density(x))
})
},
ui = fluidPage(
sliderInput("mean", "Mean:", min = -5, max = 5, value = 0, step= 0.1),
plotOutput("plot")
)
)
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
