我的Shiny应用程序中有一个滑块输入类型'range',我希望得到用户在我的服务器中选择的最小值和最大值.R
在我的ui.R我有
sliderInput("range", "Age:",
min = 0, max = 100, value = c(0,100))
我希望得到的值不是我定义的最小值和最大值
答案 0 :(得分:19)
您可以使用input$range[1]
分钟和input$range[2]
分享最大
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)