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

我应该倾斜标签，以便＆＃34;名称＆＃34;适合每个栏下面，还是有办法减小字体大小以使其适合水平？

Answer 1

您可以自己玩游戏，但可以通过theme

访问每个地块的元素

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

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