如何从迷你图工具提示中的日期中删除逗号？答案

【问题标题】：How do I remove the comma from the date in the sparkline tooltip?如何从迷你图工具提示中的日期中删除逗号？
【发布时间】：2021-02-03 14:49:54
【问题描述】：

我想从闪闪发光的工具提示中删除日期中的逗号，但我需要将其保留在值中。我不完全理解jQuery Sparkline 格式。

Sparkling tooltip example

library(shiny)
library(dplyr)

ui <- fluidPage(

  htmlwidgets::getDependency('sparkline'),

  DT::dataTableOutput("table")

)

server <- function(input, output) {

    raw_data <- data.frame(date = 2000:2021,
                     value = sample(100:500, 22))

  data <- raw_data %>%
    # Create the sparkline
    summarise("value" = sparkline::spk_chr(c(value),
                                xvalues = date,
                                tooltipFormat = '{{x}}: {{y}}'))

  output$table <- DT::renderDataTable({

    cb <- htmlwidgets::JS('function(){debugger;HTMLWidgets.staticRender();}')

    DT::datatable(data = data,
              escape = FALSE,
              options = list(drawCallback = cb))
  })

}

shinyApp(ui, server)

【问题讨论】：

标签： r shiny sparklines

【解决方案1】：

定义here，你可以设置numberDigitGroupSep为空字符串：

data <- raw_data %>%
    # Create the sparkline
    summarise(
        "value" = sparkline::spk_chr(
            c(value),
            numberDigitGroupSep = "",
            xvalues = date,
            tooltipFormat = '{{x}}: {{y}}'
        )
    )

【讨论】：

啊，太好了，谢谢！有没有办法只将此应用于 xvalues？