千位分隔符 - 使用 XLConnect 和 R 格式化 excel 单元格

Thousand seperator - format excel cell using XLConnect and R

我使用 XLConnect 将具有大值的表导出到 .xlsx。

有没有一种方法可以将结果写入具有激活千位分隔符的 excel 单元格?

library(XLConnect)
#example for a large value
a <- 10000000000

wb <- loadWorkbook("sof_q.xlsx"), create = TRUE)
    cs <- createCellStyle(wb)
    setDataFormat(cs, format = "0.00")
createSheet(wb, name = "a")
writeWorksheet(wb,a,"a",startRow = 1, startCol = 1, header = TRUE)
    rc = expand.grid(row = 1:2, col = 1:2)
    setCellStyle(wb, sheet = "a", row = rc$row, col = rc$col, cellstyle = cs)
    setColumnWidth(wb, sheet = "a", column = 1:5, width = -1)
saveWorkbook(wb)

在 Excel 中,a 应该是这样的

10.000.000.000

正在使用

setDataFormat(cs, format = "0,000,000.00")

可能有效,但在较短的值的情况下,我有像

这样的值
0,032,666.29

使用 # 作为数字占位符:

setDataFormat(cs, format = "###,###.00")

setDataFormat(cs, format = "###,##0")