Error when using setColWidths() and groupColumns() on overlapping columns

[DavidZenz]

When using both functions setColWidths() and groupColumns() on overlapping columns I get the following error:

Error in if (width_hidden != outline_hidden) { : 
  missing value where TRUE/FALSE needed

To Reproduce

rm(list = ls())
library(openxlsx)

# create workbook and add sheet
wb <- createWorkbook(title = "column width and grouping error")
addWorksheet(wb, sheetName = 1)

# set col widths
setColWidths(
  wb,
  sheet = 1,
  cols = 1:100,
  widths = 8
)

# group columns
groupColumns(wb, sheet = 1, cols = 20:100, hidden = TRUE)

results in

Error in if (width_hidden != outline_hidden) { : 
  missing value where TRUE/FALSE needed

Expected behavior
I expected that groupColumns just would group it afterwards, but clearly there is something wrong with the behaviour of the function.

Desktop :

> sessionInfo()
R version 3.6.3 (2020-02-29)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 19041)

Matrix products: default

Random number generation:
 RNG:     Mersenne-Twister 
 Normal:  Inversion 
 Sample:  Rounding 
 
locale:
[1] LC_COLLATE=English_United Kingdom.1252  LC_CTYPE=English_United Kingdom.1252    LC_MONETARY=English_United Kingdom.1252 LC_NUMERIC=C                           
[5] LC_TIME=English_United Kingdom.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] openxlsx_4.2.1.9000

loaded via a namespace (and not attached):
[1] compiler_3.6.3 tools_3.6.3    Rcpp_1.0.5     stringi_1.4.6  zip_2.1.1 

I also could replicate the problem under Debian

R version 3.6.3 (2020-02-29)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Debian GNU/Linux 9 (stretch)

Matrix products: default
BLAS:   /usr/lib/libblas/libblas.so.3.7.0
LAPACK: /usr/lib/lapack/liblapack.so.3.7.0

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C               LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8     LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8    LC_PAPER=en_US.UTF-8      
 [8] LC_NAME=C                  LC_ADDRESS=C               LC_TELEPHONE=C             LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] openxlsx_4.2.1.9000

loaded via a namespace (and not attached):
[1] compiler_3.6.3 tools_3.6.3    Rcpp_1.0.5     stringi_1.5.3  zip_2.1.1     

[JoshuaSturm]

Thanks, I'm able to replicate. This will be fixed in an upcoming PR.

[ycphs]

@JoshuaSturm Thank you

[FrancoisR95]

I encountered the same issue but thanks to the explanation above, the workaround is clear: use the function groupColumns() before the function setColWidths().

Many thanks @JoshuaSturm for this useful group/ungroup feature!

If may make a suggestion, one very nice additional feature would be to be able to set the grouping options of each sheet. By default, Excel's settings for groupings are set to "Summary Rows Below Detail" and "Summary Columns to Right of Detail" but often this is not what is wanted.

[JoshuaSturm]

@FrancoisR95

Thanks for the suggestion. Could you please open a new issue so we can look into it?

[FrancoisR95]

@JoshuaSturm Many thanks. For this feature request I have just opened the issue #107 "Setting sheet grouping options (summary rows below/over details; summary columns right/left of details)".