r - 在仪表板中按日期排序/排列

Question

我正在尝试制作一个仪表板，其中 grouper 变量可以在不同的变量上制作数据透视表。其中一个分组变量是 year_month (jaar_maand)，而其他分组变量是分类变量。如果我制作情节，月份的顺序真的很奇怪，2019-02，然后是 2019-04、2019-07，我该如何将此顺序固定为 2019-01、2019-02、2019-03 等。

亲切的问候，

斯蒂菲

### Data ###  
## Group_by Filter Data
  output$groups1 <- renderUI({
    df_ <- mydata_()
    selectInput(inputId = "grouper1", label = "Group variable", choices = c("var1","var2","var3","var4","var5","var6", "jaar_maand"), selected = "var1")
  })


  mydata_ <- reactive({
    data_ <- df2  # 
    data_
  })
 
  summary_data_ <- reactive({
    req(input$grouper1)
    mydata_() %>%
      filter(Date >= input$dateRange1[1] & Date <= input$dateRange1[2]) %>%
      dplyr::group_by(!!!rlang::syms(input$grouper1), var10) %>%
      dplyr::summarise(aantal = n()) %>%
      dplyr::arrange(!!!rlang::syms(input$grouper)) 
    
  })
  # staafdiagram 
  output$barPlot1 <- renderHighchart({
    data_ <- summary_data_()
    hchart(data_, "column", hcaes(x = (!!input$grouper1) , y = aantal , group = var10)) %>% # --> de plot zelf komt in het output deel van de UI
      hc_plotOptions(column = list(stacking = "normal"))
  })

标签： rhighchartsshinypivotshinydashboard

Answer 1

根据我的经验，如果您没有将分类作为因素，通常会出现这些问题。

无法真正说出将代码中的内容放在哪里 - 但我的建议是将 jaar-maand 变成一个因素，以便级别顺序指示情节顺序。