我使用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")
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句