如何在ggplot2箱线图中修改须线颜色并保留黑色中位数线

问题说明 #

你当前的箱线图已生成箱体，需要调整两个样式：须线颜色与对应箱体填充色匹配，同时中位数线固定为黑色。

原代码 #

ggplot(mirtras, aes(x=variable, y=value, fill=Cond)) +
geom_boxplot() +
theme_classic() +
theme_bw() +
theme(plot.title= element_text(hjust=0.5, face= "bold"),
        plot.margin = margin(1,3,1,3, "cm")) +
stat_boxplot(geom ='errorbar') +
scale_fill_manual(values=c("green","blue","red"), name ="condition") +
labs(colour="condition")

修改后的代码 #

ggplot(mirtras, aes(x=variable, y=value, fill=Cond)) +
  # 固定中位数线为黑色
  geom_boxplot(median.colour = "black") +
  # 让须线颜色跟随Cond分组，与填充色对应
  stat_boxplot(geom = 'errorbar', aes(colour = Cond)) +
  # 保留单个主题，避免样式冲突
  theme_bw() +
  theme(plot.title= element_text(hjust=0.5, face= "bold"),
        plot.margin = margin(1,3,1,3, "cm")) +
  # 设置箱体填充色
  scale_fill_manual(values=c("green","blue","red"), name ="condition") +
  # 同步须线颜色，与填充色完全匹配
  scale_colour_manual(values=c("green","blue","red"), name ="condition")

关键调整点 #

• 须线颜色匹配：给stat_boxplot添加aes(colour = Cond)，让须线颜色和箱体填充色绑定同一分组变量，再通过scale_colour_manual同步颜色值，确保颜色完全一致。
• 中位数线固定黑色：在geom_boxplot中直接设置median.colour = "black"，强制中位数线为黑色，不受颜色映射影响。
• 优化主题设置：移除重复的theme_classic()，因为theme_bw()会覆盖它的样式，保留一个主题即可。

内容的提问来源于stack exchange，提问作者lre1234