相关疑难解决方法(0)

我正在尝试使用创建热图ggplots geom_tile。目前，网格线以每个网格线的中间为中心geom_tile。我想要的是网格线与每个图块的开始/结束对齐。我看过一些相关的帖子（此处，此处，但所有帖子都在处理连续尺度。就我而言，两个尺度都是离散/因子。有什么想法吗？非常感谢！

library(tidyverse)

my_iris <- iris %>% 
  mutate(sepal_interval=cut(Sepal.Length, 4)) %>% 
  group_by(sepal_interval, Species)

my_iris %>% 
  summarise(n_obs=n()) %>% 
  ggplot()+
  geom_tile(aes(y=Species,
                x=sepal_interval,
                fill=n_obs))+
  theme_bw()+
  theme(panel.grid = element_line(color="black"))

^{由reprex 包(v0.3.0)于 2020-01-28 创建}