在Shiny中自定义迷你线工具提示

Question

我有一个类似链接中显示的数据集。基本上，有2列，一列是Date，另一列是Value。

如何使用显示日期和值的工具提示在Shiny中创建迷你图？ 我在这个链接中找到了一个例子：

  output$sparkBox <- renderValueBox({
tags$div(class = "col-sm-4",
         tags$div(class = "small-box bg-aqua",
                  tags$div(class = "inner",
                           h3(data[3]),
                           p("Best Price")),
                  tags$div(class = "spark",
                           sparkline:::sparklineOutput("sprk", 150, 80),
                           sparkline:::sparkline(outputid = "sprk", 
                                                 values = data,
                                                 tooltipFormat =  '${{y}}',
                                                 width = 150, height = 80)
                  )))

}）

当我将值绘制为迷你图时，如何将日期值添加到tooltipFormat字段中？例如“2016-10：1234”

感谢任何建议。

Answer 1

也许有点晚了，但我刚刚发现了sparkline

sparkline(outputid = "sprk", 
          values = data,
          tooltipFormat =  '{{x}}: ${{y}}',
          width = 150, height = 80)

应该做的伎俩