I created this heatmap in R with ggplot2 heatmap

I'd like to add empty tiles borders for the empty observations, but these values are absent in my dataset, which has the following structure :

Any idea please ?

CodePudding user response：

I would create an empty tibble with the structure you need and join in the real data. For example,

fake_dat <- crossing(Shop = 1:3, Day = 1:20)
plot_dat <- left_join(fake_dat, real_dat, by=c("Shop","Day")

ggplot(plot_dat, aes(Day, Shop)) %>%
    geom_tile(color="black") %>%
    geom_label(aes(label=Sales))