R闪亮输入滑块范围值

Ana*_*lab 8 r input slider shiny

我的Shiny应用程序中有一个滑块输入类型'range',我希望得到用户在我的服务器中选择的最小值和最大值.R

在我的ui.RI有

sliderInput("range", "Age:",
min = 0, max = 100, value = c(0,100))
Run Code Online (Sandbox Code Playgroud)

我想得到的值不是我定义的最小值和最大值

Por*_*hop 19

您可以使用input$range[1]min和input$range[2]max 来访问滑块范围

library(shiny)

ui <- basicPage(sliderInput("range", "Age:",min = 0, max = 100, value = c(0,100)),textOutput("SliderText"))
server <- shinyServer(function(input, output, session){
  my_range <- reactive({
    cbind(input$range[1],input$range[2])
})
output$SliderText <- renderText({my_range()})
})
shinyApp(ui = ui, server = server)
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述