Выбор входных данных - это уникальные значения столбцов входного файла.csv файла.

Question

Я пытаюсь разработать блестящее приложение, в котором переменная оси Y будет уникальным значением столбца из загруженного CSV-файла. Насколько я могу прочитать имена столбцов и установить их в качестве выбора в selectInput, но не в уникальные значения столбцов. мой код для чтения и выбора столбца

    library(shiny)

myData <- NULL
ui <- fluidPage(

  titlePanel("My R Shiny App"),

  sidebarPanel(

    fileInput(
      'file', 
      'Choose file to upload.'
    ),

    selectInput(
      "y_input", 
      label = h5("Select Time Series/Response Variable"),
      ""
    )

  )

)

server <- function(input, output, session) {

  inFile <- reactive({
    if (is.null(input$file)) {
      return(NULL)
    } else {
      input$file
    }
  })

  myData <- reactive({
    if (is.null(inFile())) {
      return(NULL)
    } else {
      read.csv(inFile()$datapath)
    }
  })

  observe({
    updateSelectInput(
      session,
      "y_input",
      choices=names(myData()))

  })

}
shinyApp(ui=ui, server=server)

набор данных для примера:

Geography   Measure Time    Value
abc Meause A    2011    4
abc Meause A    2012    5
abc Meause B    2013    6
cba Meause B    2014    7
cba Measure C   2015    8
cba Measure C   2016    9
bac Meause A    2011    10
bac Meause A    2012    4
bac Meause B    2013    5
abc Meause B    2014    6
cba Measure C   2015    7
bac Measure C   2016    8

Для выбора по оси Y я хочу получить уникальные значения столбца Geography: abc, cba, bac. Любая идея и предложения.

Answer 1

_{Перенос решения из комментария sconfluentus user6258859 ответ:}

choices =unique(df$Geography)вернет все возможные значения столбца Geography и сохранит их в переменной, которую вы можете использовать для раскрывающегося списка.