wonders of conditional formatting

[JanMarvin]

A little something I just came across. Was fixing gradientFill and thought, maybe that is what's broken in the conditional formatting color scale example? Nope, it was simply the wrong sheet selected.

wb <- wb_workbook()
wb$add_worksheet("colourScale", zoom = 30)
df <- read_xlsx(system.file("extdata", "readTest.xlsx", package = "openxlsx2"), sheet = 5)
wb$add_data("colourScale", df, colNames = FALSE)
wb_conditional_formatting(wb, "colourScale",
                          cols = seq_along(df), rows = 1:nrow(df),
                          style = c("black", "white"),
                          rule = c(0, 255),
                          type = "colourScale"
)
wb$set_col_widths("colourScale", cols = seq_along(df), widths = 1)
wb$set_row_heights("colourScale", rows = seq_len(nrow(df)), heights = 7.5)
wb$open()

[JanMarvin]

Another conditional formatting example: here