如何恢复裁剪倾斜的标签？

Question

我有这张美丽的照片：

由此代码创建：

  melt(mat_reordered) %>% ggplot(., aes(x=Var1, y=Var2)) + 
  geom_tile(aes(fill = value)) + 
  geom_text(aes(label = value)) +
  scale_fill_gradient(low = "white", high = "red") +
  theme(legend.title = element_blank(),
        axis.title=element_blank(),
        axis.text.x = element_text(angle = 90, vjust = 0.5, hjust=-0.2)) 

除了有角度的 x 标签外，一切都很好。我怎样才能显示它们未裁剪？或者我怎样才能以其他方式改进它们？