R-贴合X轴标签

Question

我目前正在使用ggplot2制作条形图，但是，x轴标签被挤压在一起，无法读取。 我还读过其他一些人以45度角倾斜这些示例，这绝对是一个选择。 我用下面的代码尝试了一下：

ggplot(data = Overall_survival, 
       aes(x=reorder(Name, -OS), y=OS, fill = factor(Best_Response))) + 
  ylim(0, 50) + 
  ylab("Overall Survival (months)") + 
  xlab("Response by Name") + 
  theme_classic() + 
  ggtitle("Overall Survival in Patients Treated with Treatment (n=35)") + 
  theme(plot.title = element_text(hjust = 0.5)) + 
  geom_bar(stat="identity", width = 0.6) + 
  guides(fill = guide_legend(title = "Best Response"))

我应该倾斜标签以使“名称”适合每个栏的下方，还是可以减小字体大小以使其适合水平？

Answer 1

您可以自己玩耍，但是可以通过theme访问每个剧情的元素：

ggplot(...) +
... +
theme(axis.text.x = element_text(size = 20, angle = 45, hjust = 1))

您可以将text替换为axis.text.x或axis.text.y等。