r - R中带有ggplot的背景带

Question

我正在尝试为不同的组创建箱线图。我想在 3 个水平带中为背景着色。一个中心，其中所有的观测值都接近整体平均值

均值(重量)-0.5 < x < 均值(重量)+0.5

其他 2 个波段是下方和上方的。

这些是我的阴谋

library(ggplot2)
bp <- ggplot(data=PlantGrowth, aes(x=group, y=weight, fill=group)) + geom_boxplot()
bp

Answer 1

使用 geom_rect :

bp <- ggplot(data=PlantGrowth, aes(x=group, y=weight, fill=group)) +
    geom_rect(ymin = -Inf, ymax = lwWt, 
              xmin = -Inf, xmax = Inf, fill = 'blue') +
    geom_rect(ymin = lwWt, ymax = upWt, 
              xmin = -Inf, xmax = Inf, fill = 'pink') + 
    geom_rect(ymin = upWt, ymax = Inf, 
          xmin = -Inf, xmax = Inf, fill = 'skyblue') +
    geom_boxplot() 
print(bp)
ggsave("example.jpg", bp)

这给你这个数字:

希望你会改变背景颜色:)