我在 Shiny 中上传了一个 .csv 文件。我想读取列名并在 selectInput 中使用它们作为选择。我该怎么做？

Question

我已经使用 fileInput() 在 Shiny App 中上传了一个 .csv 文件。 我希望阅读列名并将它们显示为 selectInput() 中的选项/选择。我该怎么做？

fileInput("file1", "Choose CSV File",
              multiple = FALSE,
              accept = c("text/csv",
                         "text/comma-separated-values,text/plain",
                         ".csv")),

我们也可以在ui部分中使用服务器部分代码中的变量吗？

Answer 1

没有reprex 就不容易回答。但这是我理论上的答案。

如果您需要列名，请添加 colnames()。

ui.R

uiOutput("myselectinputUI")

server.R

output$myselectinputUI <- renderUI({
    list_label_value <- input$file1

    # read my link with an other answer of mine below if you need many columns in the select input

    setNames(list_label_value$value,list_label_value$label)  

    selectizeInput(inputId="myselectinput",
                     label="Report Choice",
                     choices = list_label_value,
                     width = '500px',
                     selected = "1"
                     #  , options = list(render = I(''))
      )
}) 

• 关于选择 In Shiny selectInput: to have many columns value et label with vertical align 中的多列的问题