用户输入csv中的R闪亮用户过滤器

Question

我正在尝试让用户上传.csv文件，然后获取该.csv文件的列（因子）并创建用户输入以确定将为该数据选择该字段中的哪些唯一名称帧。

所以，如果我有以下示例data.frame：

          COURSE    VALUE
      1     A        7
      2     A        9
      3     B        10
      4     C        12
    ....

我想过滤一个带有A，B和C的复选框列表。然后用户可以选择说A和C，并且只对具有A和C的行过滤数据框。下面的代码只是试图获取用户输入的复选框。

加载csv文件很好。它是加载到model.data0（）中的反应部分。但是，我得到一个关于长度（0）的错误。下面的代码来自server.r文件，而ui.r只有一个RenderU {（'coose_course）}。

output$choose_course <- renderUI({
  # If missing input, return to avoid error later in function
  if(is.null(input$model.input))
    return()

  # Get the data set with the appropriate name
  course.names <- as.vector(unique(select_(model.data0(),"COURSE")))

  # Create the checkboxes and select them all by default
  checkboxGroupInput("courses", "Choose courses", 
                     choices  = course.names,
                     selected = course.names)
})