更改置信区间带的颜色？

Question

我正在使用 blandr 包制作 Bland & Altman 图，置信区间肯定是我想要绘制的：

library(blandr)
x1 <- rnorm(100);x2 <- rnorm(100,mean = 1)
blandr.draw(x1,x2, ciShading = TRUE,ciDisplay=TRUE,plotter = "ggplot")

我更喜欢更改置信区间的颜色。据我所知，它们不会响应填充颜色的任何变化。我能做什么？

Answer 1

blandr

创建一个 ggplot 对象，因此您可以使用

ggplot_build

方法修改颜色。

library(blandr)
library(ggplot2)
x1 <- rnorm(100);x2 <- rnorm(100,mean = 1)

p <- 
blandr.draw(x1, x2, ciShading = TRUE, ciDisplay=TRUE, plotter = "ggplot")

p_build <- ggplot_build(p)
#> Warning: Use of `plot.data$x.axis` is discouraged. Use `x.axis` instead.
#> Warning: Use of `plot.data$y.axis` is discouraged. Use `y.axis` instead.
p_build$data[[12]][["fill"]] <- "grey"
p_build$data[[13]][["fill"]] <- "steelblue"
p_build$data[[14]][["fill"]] <- "thistle"

grid::grid.draw(ggplot_gtable(p_build))

^{由 reprex 包于 2021-06-11 创建（v2.0.0）}

Answer 2

使用“构建”方法效果很好，但它不允许您更改背景/删除网格。知道如何做到这一点吗？