R Shiny - 条件面板中的条件面板

我想知道是否可以在另一个条件面板中包含一个条件面板。

例如，如果我有一个包含两个选项的下拉列表：1 和 2

选择 1 将显示一组选项，选择 2 将显示另一组选项。

但是是否可以在这些条件面板中嵌套一个条件面板，以便我可以在选项 1 的输入中拥有另一个下拉列表。

这是一些代码，用于说明我正在尝试执行的操作，但这不起作用

 selectInput("n", label = h3("Select Option"), 
                choices = list("1" = 1, "2" = 2),
                selected = 1),
  #1
  conditionalPanel(
    condition = "input.n == '1'",
    titlePanel("1 Options"),
    selectInput("b", label = h4("Select Option"), 
                choices = list("A" = 1, "B" = 2),
conditionalPanel(
condition = "input.b == '1'",
    titlePanel("1 Options")
),

conditionalPanel(
condition = "input.b == '2'",
    titlePanel("2 Options")
),

    )),

是的，您可以轻松地嵌套条件面板，或多或少正如您所尝试的那样。在您的代码中，您只是有一些放错位置的括号和多余的逗号。我认为这是一个可以满足您要求的工作应用程序：

ui <- fluidPage(
  selectInput("n", label = h3("Select Option"), 
        choices = list("1" = 1, "2" = 2),
        selected = 1),
  conditionalPanel(
    condition = "input.n == '1'",
    titlePanel("1 Options"),
    selectInput("b", label = h4("Select Option"), 
          choices = list("A" = 1, "B" = 2)),
    conditionalPanel(
          condition = "input.b == '1'",
          titlePanel("1 Options")
      ),
      conditionalPanel(
          condition = "input.b == '2'",
          titlePanel("2 Options")
      )      
  )
)

server <- function(input, output){}

shinyApp(ui, server)