用两种 colored颜色填充方框图

发布于03月05日

我想用2种 colored颜色填充盒子图，而不是1/ggplot()，使用geom_boxplot().

例如，第一种 colored颜色介于框图宽度的0%和80%之间，第二种 colored颜色介于框图宽度的80%和100%之间.

我找不到其他的例子，这样的图与geom_boxplot，所以我不知道这是可行的.

我想避免使用geom_rect()或annotate().

Reproducible example个

##### Initiating objects
### Colors
colFill <- c("#4a7ff9", "#4aecf9")
colShader <- c("#4964a3", "#499ba2")

### Dataset
set.seed(1)
df <- data.frame(Values=rnorm(100, 100, 10), 
                 Group=rep(c("Blue", "Cyan"), each=50))

##### Display plot
ggplot(df, aes(y=Values, x=Group, fill=Group)) + 
  geom_boxplot(lwd=3, width=0.5) + 
  scale_fill_manual(values=colFill) + 
  theme_classic() + 
  theme(legend.position="none")

My aim个

谢谢你

推荐答案

这里有一个只用geom_boxplot就能做到这一点的方法.我们使用三个层:第一层只是主填充 colored颜色，没有线条.第二个是一个细长的方框图，用阴影 colored颜色填充，没有线条或异常值，向右轻推.第三个是只显示线条的框图.这避免了使用注释或Grob黑客的需要.

ggplot(df, aes(y = Values, x = Group, fill = Group)) + 
  geom_boxplot(lwd = 0, width = 0.5) + 
  geom_boxplot(position = position_nudge(0.2), width = 0.1,
               lwd = 0, aes(fill = paste(Group, 2)), outlier.shape = NA) +
  geom_boxplot(lwd = 3, width = 0.5, fill = NA) + 
  scale_fill_manual(values = c(colFill, colShader)[c(1, 3, 2, 4)], 
                    guide = 'none') + 
  theme_classic()