openxlsx错误：行和列的长度必须相等

Question

我遇到了this Nabble用户尝试使用非矩形行和列将样式应用于Excel工作簿时遇到的相同问题。

wb <- createWorkbook()
addWorksheet(wb, "Iris")
writeData(wb, sheet = 1, x = iris)
boldStyle <- createStyle(textDecoration=c("bold"))
addStyle(wb, 1, style = boldStyle, cols=4:5, rows = 1:150)

  

addStyle出错（wb，1，style = boldStyle，cols = 4：5，rows = 1：150，：行和列的长度必须相等。

如何修复此代码以便我不会收到错误，以便我可以将样式应用于非矩形单元格集？

Answer 1

addStyle的一个参数，gridExpand,默认设置为FALSE。要做到这一点的诀窍就是将此参数设置为TRUE.这允许函数将样式应用于所提供的行和列的组合。

用这一行替换最后一行，它应该可以正常工作：

addStyle(wb, 1, style = boldStyle, cols=4:5, rows = 1:150, gridExpand = T)