R Shiny：如何选择动态闪亮输入答案

【问题标题】：R Shiny: How to get choices of dynamic shiny inputR Shiny：如何选择动态闪亮输入
【发布时间】：2019-06-14 15:46:30
【问题描述】：

我有不同的 SelectInput 字段是动态生成的。我正在尝试获取每个 SelectInput 的选择，但失败如下：

input[[ paste0("FilterField","_",rowNumber)]]$choices

变得像：NA NA NA NA。

更新：

我在这里创建了 4 个 selectInput，我想选择第一个下拉菜单。请帮我解决这个问题。

library(shiny)

choices = c("","Employee","State","City","Status")

ui = fluidPage(
  box(
    uiOutput("InputUI"),

    actionButton(
      inputId = "ENTER",
      style = "simple",
      size = "sm",
      label="Print Number of Choices in Console"
    )
  )

)
server = function(input, output) {
  filterRow=reactiveValues(
    CurrentRow=4
  )

  output$InputUI=renderUI({
    box(
      div(
        selectInput(
          inputId=paste("FilterField",1,sep = "_"),
          label="",
          choices=choices,
          multiple=F,
          selectize = F
        )
      ),

      div(
        selectInput(
          inputId=paste("FilterField",2,sep = "_"),
          label="",
          choices=choices,
          multiple=F,
          selectize = F
        )
      ),

      div(
        selectInput(
          inputId=paste("FilterField",3,sep = "_"),
          label="",
          choices=choices,
          multiple=F,
          selectize = F
        )
      ),

      div(
        selectInput(
          inputId=paste("FilterField",4,sep = "_"),
          label="",
          choices=choices,
          multiple=F,
          selectize = F
        )
      )
    )

  })

  observeEvent(input$ENTER,{
     print(input[[ paste0("FilterField","_",1)]]["choices"])
  })

}
shinyApp(ui,server,options=list(launch.browser=F))

我已经更新了最新的代码，请帮忙。

【问题讨论】：

请提交一个可重现的示例，一般来说，如果您将多个选项设置为 True，您可以使用 x = input$choices; x[1];x[2]... 对其进行索引
我需要该下拉列表的值，我动态地添加和删除下拉列表的值
请提交一个带有 ui、server 和 shinyApp() 调用的可重现示例。
更新@Sada93
此代码本身不起作用

标签： r shiny

【解决方案1】：

你为什么决定 $choices 存在于闪亮中？只有input$inputId 值。如果需要更改选择，可以使用

updateSelectInput()

函数并将有条件计算的新选择传递给它。

【讨论】：