我有一个数据框，使用以下代码在给定类别的每个组之间应用了一个空格。
DF2 <- head(do.call(rbind, by(DF, DF$AcctName, rbind,"")), -1)
每当我尝试在具有以下数字格式的openxlsx脚本中使用DF2时，生成的Excel文件就没有格式，而只有原始数据。是什么原因导致脚本无法将格式应用于Excel文件，因为如果我不执行添加空格的rbind代码，脚本将正常工作？
addWorksheet(wb, "Sheet")
writeData(wb, "Sheet", DF2, startCol = 2, startRow = 2)
midStyle <- createStyle(halign = "center", numFmt = "#,##0;-#,##0;-")
addStyle(wb, "Sheet", midStyle, rows = 2:18, cols = 2:55, gridExpand = T)