千位分隔符 – 使用XLConnect和R格式的excel单元格
我使用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")