Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/66.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 用户输入csv中的用户过滤器_R_Shiny - Fatal编程技术网

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

R 用户输入csv中的用户过滤器,r,shiny,R,Shiny,我试图让用户上传一个.csv文件,然后获取该.csv文件的列系数,并创建的用户输入,以确定该字段中的哪些唯一名称将被选择为数据帧 因此,如果我有以下示例data.frame: COURSE VALUE 1 A 7 2 A 9 3 B 10 4 C 12 .... 我想筛选一个带有a、B和C的复选框列表。然后用户可以选择a和C,

我试图让用户上传一个.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中的无功部分。但是,我得到了一个关于length0的错误。下面的代码来自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)
})

也许将course.names更改为course.names ui.r只是有一个RenderU{'coose_course}-你是说uiOutput'choose_course'?@Batanichek,是的,我是说uiOutput@zx8754,我认为它不喜欢$for reactive函数。似乎我需要转置它?不确定你所说的转置是什么意思。把course.names改成course.names ui.r只是有一个RenderU{'coose\u course}-你是说uiOutput'choose\u course'?@Batanichek,是的,我是说uiOutput。@zx8754,我认为它不喜欢$for被动函数。好像我需要转置它?不知道你说的转置是什么意思