如何在所有方面保留或删除geom_tile的灰色边距？

Question

你可以看到一组有水平灰色边缘，另一组则没有。

如何在整个方面保持一致？

expand.grid(x=1:3, y=1:3)
a<-expand.grid(x=1:3, y=1:3)
a$value=rnorm(9)
a$group=1
b<-expand.grid(x=3, y=1:3)
b$value=rnorm(3)
b$group=2
c<-rbind(a,b)
ggplot(c, aes(x=factor(x), y=factor(y), fill=value)) + 
  geom_tile() + facet_grid(.~group, scale="free_x", space="free_x")

Answer 1

您应在expand=c(0,0)和scale_x_discrete()中添加scale_y_discrete()以删除灰色区域。

  +scale_x_discrete(expand=c(0,0))+
  scale_y_discrete(expand=c(0,0))