dark mode for accessibility

[chuddy-ibk]

Dear developer.
I was wondering how to use complexheatmap in dark mode?
I am not able to get rid of the white background. For me, or my eyes, it is much less painful to have everything visualized in dark mode.
Is there a solution to change the white background to black, so I could reverse thereafter the font to white or other colors?
Kindly
Tom

[RiboRings]

Hey! This way you can manually turn a heatmap into dark mode, but it would be nice if there was a wrapper for dark mode like ggdark for ggplot2.

library(ComplexHeatmap)

hm <- Heatmap(
    matrix(data = c(1, 3, 4, 3, 2, 1, 5, 3, 2),
    nrow = 3, ncol = 3),
    column_dend_gp = gpar(col = "white"),
    row_dend_gp = gpar(col = "white")
)

draw(
    hm,
    background = "black",
    legend_title_gp = gpar(col = "white"),
    legend_labels_gp = gpar(col = "white")
)