如何将ggplot扩展画布的背景设为与panel.background同色

你通过plot.margin设置的顶部边距属于绘图区（plot）的范围，默认plot.background填充色为白色，和panel的深灰色不一致，所以会出现白边。

方案1：扩展y轴范围（最推荐，仅顶部预留同色空白） #

直接把预留的空白区域放在panel内部，自动继承panel的填充色，只要设置y轴上限高于实际数据最大值，且不添加对应区域的刻度，就不会生成多余网格线：

library("tidyverse")

dark_grey <- "#525250"

df <- tibble(
  x = c(1, 2, 3, 4, 5),
  y = c(2, 3, 5, 8, 20)
)

ggplot(data = df, aes(x = x, y = y, group = 1)) +
  geom_line(colour = "red") + 
  # 调整y轴上限预留顶部空白，breaks仅设置到实际数据最大值，无多余网格
  scale_y_continuous(limits = c(0, 30), breaks = seq(0, 20, 5)) +
  theme(
    panel.background = element_rect(fill = dark_grey)
  )

如果需要精确控制顶部空白的高度，可以根据最终输出的图表尺寸换算y轴上限数值，或者配合scale_y_continuous的expand参数用单位调整。

方案2：修改plot背景填充（适合全边距同色场景） #

如果你需要整个绘图区的边距都和panel同色，直接设置plot.background的填充色和panel一致即可：

library("tidyverse")

dark_grey <- "#525250"

df <- tibble(
  x = c(1, 2, 3, 4, 5),
  y = c(2, 3, 5, 8, 20)
)

ggplot(data = df, aes(x = x, y = y, group = 1)) +
  geom_line(colour = "red") + 
  theme(
    panel.background = element_rect(fill = dark_grey), 
    plot.margin = unit(c(4,0,0,0), "cm"),
    # 设置plot背景和panel同色，color设为NA避免默认边框
    plot.background = element_rect(fill = dark_grey, color = NA)
  )

内容的提问来源于stack exchange，提问作者ixodid