在仍拖动滑块的情况下,是否可以从ShinyWidgets :: noUiSliderInput()读取数据?

时间:2018-10-24 11:53:24

标签: r shiny nouislider

是否可以持续跟踪滑块的位置, 甚至在拖动完成和释放鼠标单击之前?

最小示例:
(请注意,只有在完成拖动后,才更新滑块值)

library(shiny)
library(shinyWidgets)

shinyApp(
  ui = fluidPage(
    noUiSliderInput(
      inputId = "the_slider", label = NULL, 
      min = 0, max = 10, step = 1, value = 5, 
      behaviour =  c("snap")
    ),
    textOutput("slider_value")
  ), 
  server = function(input, output, session) {
    output$slider_value <- renderText(input$the_slider)
  }
)

编辑:
最终目标是input$the_slider的值将不断更新,而不仅仅是释放鼠标之后。

在下面的屏幕快照中,滑块位于 7 上,但是它的值仍为 5 ,因为我尚未释放鼠标。

enter image description here

1 个答案:

答案 0 :(得分:0)

由@Victorp here解决。谢谢!

要启用此新功能,请从Github安装ShinyWidgets并使用参数update_on = "change"