传播刻面图(R)

Question

有没有办法在ggplot2中传播刻面图？正如你在图片中看到的那样(我的情节的底部),x轴在每个图的两端重叠一点,模糊了岁月.我想将它们分开.无论我在导出时增加多少宽度,值仍然会重叠.

我的代码,如果相关:

  ggplot(filter(TotalsRegion, Source!="Total"), aes(x=Date, y=SourceSum, col=Source)) +
   geom_line(size=1) +
   facet_grid(.~Region)

Answer 1

由于您没有提供可重复的示例,我们必须为您制作一个.

library(ggplot2)
library(grid)

data(mpg)
mpg$displ <- mpg$displ + 2000
p <- ggplot(mpg, aes(displ, cty))
p <- p + geom_point()
p <- p + facet_grid(. ~ cyl)
p

p <- p + theme(panel.margin.x=unit(20, "pt"))
p

这不会受到重叠(不能为您完成所有工作),但希望很清楚面板边距设置的作用.