R中的重叠轴标签

Question

我有一个问题，我有重叠的轴标签，似乎无法找到解决方案来解决这个问题。

p <- ggplot(data=Data,aes(x=Indicator,y=Numeric,group=Expenditure_group,shape=Expenditure_group,colour=Expenditure_group))+geom_point()+geom_line()

有没有办法解决这个问题，以便没有重叠？

Answer 1

您可以通过自动缩写

中的标签来调整x轴

p + scale_x_discrete(labels = abbreviate)

或者您可以自己提供缩写标签，如

p + scale_x_discrete(labels = c("Congenital Rubella" = "C. Rub.", ..., "Total tetanus" = "T. tet.", "Yellow fever" = "Y. fever")

请参阅：http://docs.ggplot2.org/current/scale_discrete.html