我想将我的Excel输出格式设置为数字格式。但是基于我代码的其他部分,我只能通过Excel编写步骤更改格式。我查看了诸如XLSX和XLConnect包之类的R文档,似乎cellStyle
和DataFormat
将是两件事。但是我在cs <- CellStyle()
部分中苦苦挣扎。它根本不起作用:(
我在下面提供了一个非常基本的excel工作表,希望有人能帮助我。我将不胜感激!
library(xlsx)
wb <- createWorkbook()
sheet1 <- createSheet(wb, "Sheet1")
rows <- createRow(sheet1, 1:10) # 10 rows
cells <- createCell(rows, colIndex=1:8) # 8 column
setCellValue(cells[[1, 1]], "1.29")
cs <- CellStyle(wb, dataFormat=DataFormat("0.00"))
setCellStyle(cells, cs)
saveWorkbook(wb, "foo.xlsx")
shell.exec("foo.xlsx")
结果excel单元格发布在下面,并带有一条警告消息:“此单元格中的数字格式为文本或以单引号开头”