r - ggplot2：更改面板的背景颜色并独立绘图

Question

我喜欢独立于外边框的背景颜色更改绘图窗口的背景颜色。我以为我可以用panel.backgroundand做到这一点plot.background。

library(ggplot2)
p <- ggplot(ToothGrowth, aes(x=dose, y=len)) + geom_boxplot()

这看起来不错...

(p2 <- p + theme(panel.background = element_rect(fill = grDevices::rgb(0, 0, 100, 60, maxColorValue = 100))))

而且这看起来不错...

(p3 <- p + theme(plot.background = element_rect(fill = "red")))

但是这个组合看起来很奇怪......

p + theme(plot.background = element_rect(fill = "red"),
          panel.background = element_rect(fill = grDevices::rgb(0, 0, 100, 60, maxColorValue = 100)))

有没有办法将p2和p3结合起来，让边框是红色的，情节背景是蓝色的？

标签： rggplot2