ggplot2中如何让散点与双变量分组的箱线图正确对齐

你的问题根源在于：geom_boxplot 会自动对 fill=time 的分组使用 position_dodge 进行偏移排列，但 geom_point 默认采用无偏移的位置（position_identity），导致散点落在两组箱线图中间。

只需给散点图添加分组映射和偏移设置，就能让散点对应到各自的箱线图上方：

exp <- rep(c("smile", "neutral", "depressor"), each=5, times=2)
time <- rep(c("before", "after"), each = 15)
result <- rnorm(15, mean=50, sd=4)
result <- append(result, c(rnorm(15, mean=47, sd=3)))
data <- data.frame(exp, time, result)

ggplot(data, aes(exp, result, fill=time)) + 
  geom_boxplot(position = position_dodge(width = 0.75)) + # 指定箱线图偏移宽度
  geom_point(aes(group=time), # 按time分组，让散点匹配箱线图的分组逻辑
             position = position_dodge(width = 0.75)) # 偏移宽度与箱线图保持一致

关键说明： #

• aes(group=time)：明确告知ggplot按time维度分组处理散点，和箱线图的分组逻辑对齐
• position_dodge(width = 0.75)：统一箱线图与散点图的偏移宽度，确保两者完全对齐，宽度值可根据图表视觉效果微调

修改后，散点就会精准对应到各自before/after的箱线图上方。

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