r - 我在 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()如果您需要列名，请添加。

用户界面

uiOutput("myselectinputUI")

服务器.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(''))
      )
}) 

• 关于选择中的多列的anwser In Shiny selectInput：让许多列值和标签垂直对齐