删除条形背景保留面板边框

Question

我有以下类型的绘图，并且希望将各个方面框上方的每个 strip 文本保留为某种“标题”，但 strip.background 周围没有默认的灰色背景和黑色边框。我将其颜色设置为白色，这与我想要的接近，但希望 strip.background 的下边缘或 panel.border 的上边缘为黑色。

library(ggplot2)

ggplot(mtcars, aes(mpg, hp)) + geom_point() +
    facet_wrap(~carb, ncol = 3) + theme_bw() +
    theme(panel.grid.major = element_blank(),
        panel.grid.minor = element_blank(),
        strip.background = element_rect(colour="white", fill="white"),
        panel.border = element_rect(colour = "black"))

Answer 1

如果您为 strip.background 设置 element_blank() 并保留 element_rect(colour="black", fill = NA) 为 panel.border 那么 panel.border 的上边缘将为黑色。正如 @adrien 所指出的，对于 panel.background 填充应设置为 NA 以避免覆盖点(已设置为 theme_bw() 的默认值)。

ggplot(mtcars, aes(mpg, hp)) + geom_point() +
  facet_wrap(~carb, ncol = 3) + theme_bw() +
  theme(panel.grid.major = element_blank(),
        panel.grid.minor = element_blank(),
        strip.background = element_blank(),
        panel.border = element_rect(colour = "black", fill = NA))