Thousand Separators in View Data Table Highcharter

[saikatmitra71]

Hello, I've managed to add export plots/data option in my highcharter plots using the following code.

library(highcharter)
library(dplyr)

hcoptslang <- getOption("highcharter.lang")
hcoptslang$thousandsSep <- ","
options(
  highcharter.lang = hcoptslang
)

data.frame(
  category = c("A", "B", "C"),
  value = c(1500, 76546, 54579)
) %>% 
  hchart(
    "bar",
    hcaes(
      x = "category",
      y = "value"
    )
  ) %>% 
  hc_exporting(
    enabled = TRUE,
    buttons = list(
      contextButton = list(
        align = 'right'
      )
    ),
    chartOptions = list(
      title = list(
        text = "Test"
      )
    )
  )

But the "View Data Table" in exports option shows raw data. If I want to view the numeric columns with thousand separators, what should I do?