r语言 - 如何为不存在的数据填充gpplot2中的空单元格

Question

我在R中使用ggplot2创建了这个热图热图

我想为空的观测值添加空的tile边界，但是这些值在我的数据集中不存在，它具有以下结构:

<表类> 购物一天销售tbody><<tr>0101401022010530201103号032

我将创建一个具有所需结构的空标题，并加入实际数据。例如,

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))