RpivotTable 隐藏或删除折线图图例

Question

TL;DR 问题：在 Rstudio/Shiny 的 RpivotTable 包中使用折线图选项时，我可以删除要显示的图例吗？

大家好，

我对 Stack Overflow 非常陌生，R、Rstudio 和 Shiny 也是一个真正的菜鸟。

我非常喜欢 rpivotTable 包！

我可能有点过于雄心勃勃，但我希望使用 Shiny 和 rpivotTable 包来复制我之前在 Excel 中使用多个数据透视表创建并连接到切片器的仪表板...

不幸的是，我使用的数据集/数据框有大量变量，当我使用 rpivotTable 包构建折线图时，图例会填充整个屏幕而不是显示折线图:(

我的行包含超过 1000 个不同的异常代码，因此 Legend 太大而无法显示......

示例代码：

  output$pivtbl2 <- renderRpivotTable(rpivotTable(data = DataSet(),
                                                 aggregatorName = "Sum",
                                                 vals = "Count",
                                                 cols = "ExceptionDate",
                                                 rows = "ErrorCode",
                                                 menuLimit = 1200,
                                                 rendererName = "Line Chart"))

对不起，如果这个问题已经在其他地方得到了回答，我花了一些时间搜索，或者答案真的很明显我对 R 很陌生。

或任何其他关于使用或研究以实现我想要做的包的建议将不胜感激！

谢谢^_^

Answer 1

rpivotTable 中的“折线图”是 C3 图表。您可以隐藏图例，并通过将具有 c3 键的命名列表条目传递给 rpivotTable() 的 rendererOptions 参数来为 C3 图表提供其他选项。目前，您还需要调用提供额外的代码行来使其工作，如this issue on the rpivotTable GitHub page 中所述。

你的情况是：

output$pivtbl <- renderRpivotTable({
  tbl <- rpivotTable(
    data            = DataSet(),
    aggregatorName  = "Sum",
    vals            = "Count",
    cols            = "ExceptionDate",
    rows            = "ErrorCode",
    menuLimit       = 1200,
    rendererName    = "Line Chart",
    rendererOptions = list(
      c3 = list(
        legend = list(
          show = FALSE
        )
      )
    )
  )

  tbl$x$params$rendererOptions <- tbl$x$params$rendererOptions[[1]]

  tbl #return value
})

此处列出了传递给 C3 图表的可用选项：https://c3js.org/reference.html