避免在ggplot facet网格中重叠x轴标签

Question

我试图绘制一个生长图的平面网格,并且我在每个图的末端的标签彼此重叠.以下是使用mpg数据的示例代码:

print(ggplot(data = aggregate(hwy~class+year, data=mpg, mean), aes(x = year, y=hwy))+
    geom_line(aes(group = 1))+
    geom_point()+
    facet_wrap(~class,  nrow = 2)+
    xlab("Year")+
    scale_x_discrete(limits=unique(mpg$year)))

如何防止这种重叠,可能是通过从绘图边缘移动刻度线和标签.我尝试在主题中使用保证金,但我也没有成功.谢谢您的帮助.

Answer 1

我假设您要使用panel.spacing.xin 调整小平面面板之间的水平间距theme（已通过ggplot2_3.0.0测试）。

ggplot(data = aggregate(hwy~class+year, data=mpg, mean), aes(x = year, y=hwy))+
  geom_line(aes(group = 1))+
  geom_point()+
  facet_wrap(~class,  nrow = 2)+
  xlab("Year")+
  scale_x_discrete(limits=unique(mpg$year)) +
  theme(panel.spacing.x = unit(4, "mm"))

之前

之后- using panel.spacing.x()