由于您没有提供可复制的示例,因此我们必须为您做一个。
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
这不会受到重叠的影响(无法为您完成所有工作),但希望可以清楚地知道面板边距设置的作用。