如何在ggplot箱线图中对geom_jitter抖动点按Week分组排序？

我的数据是水母生长测量值，按3种孵化温度处理（Treat）、重复（Rep）、时间（Week和起始天数）分类。想要绘制箱线图，按Week分组展示不同处理的生长数据，但geom_jitter生成的抖动点未正确排序，无法对应到所属Week的箱组。当前代码如下：

b<- sanderia %>%
  ggplot( aes(x=Week, y=Growth, fill=Treat )) +
    geom_boxplot() +
    scale_fill_viridis(discrete = TRUE, alpha=0.6) +
    geom_jitter( aes(color=Rep, fill=Treat), size=0.4, alpha=0.9) +
    theme_ipsum() +
    theme(
      plot.title = element_text(size=11)
    ) +
    ggtitle("A boxplot with jitter") +
    xlab("")

我尝试在geom_jitter的aes中添加fill、group参数但无效，期望使抖动点按Week排序并落在对应箱组内。

解决方案 #

问题核心是未给分组箱线图和抖动点设置匹配的位置调整规则，导致抖动点无法对齐到对应处理的箱组位置。修改方法如下：

修改后完整代码 #

b <- sanderia %>%
  ggplot(aes(x = Week, y = Growth, fill = Treat)) +
  # 设置箱组并排间距，确保同一Week下不同Treat的箱横向排列
  geom_boxplot(position = position_dodge(width = 0.8)) +
  scale_fill_viridis(discrete = TRUE, alpha = 0.6) +
  # 使用jitterdodge让抖动点跟随对应箱组位置，同时控制抖动幅度
  geom_jitter(aes(color = Rep), size = 0.4, alpha = 0.9,
              position = position_jitterdodge(jitter.width = 0.2, dodge.width = 0.8)) +
  theme_ipsum() +
  theme(plot.title = element_text(size = 11)) +
  ggtitle("A boxplot with jitter") +
  xlab("")

关键调整说明 #

• position_dodge(width = 0.8)：指定同一Week下不同Treat箱组的横向并排间距，width值可根据需求微调
• position_jitterdodge(jitter.width = 0.2, dodge.width = 0.8)：
  • dodge.width必须和箱线图的width保持一致，确保抖动点精准对齐到对应处理的箱组
  • jitter.width控制点在箱组内的横向抖动幅度，避免点重叠，数值越小抖动范围越窄

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