如果在Shiny的条件面板中服务嵌套

Question

我有一个条件面板，可以显示radioButtons＆amp;一个基于选择的sliderInput。单选按钮呈现预定义的频率，滑块输入允许用户选择范围。

根据输入范围，我想选择年龄范围。代码的服务器部分是：

if (input$Age == "Discrete Age Values" & input$slider1 == input$range[1]:input$range[2]) {
           s()[s()$Age >= input$range[1] & s()$Age <= input$range[2], ]
       } 

＆＃34; Slider1＆＃34;嵌套在＆＃34;离散年龄值＆＃34;作为一个条件。

然而，这给了我一个错误：

Error in input$range[1]:input$range[2] : argument of length 0

如何在此定义范围？