R中分层箱线图美学映射错误：自定义箱线参数需求求助

问题背景 #

需要绘制分层箱线图：按变量p（Sally/Tom/Brian）为箱线着色，同时用变量z（标准差）自定义箱线的上下限、中位数等参数，但直接传入参数时出现Aesthetics must be either length 1 or the same as the data (21): lower的报错。

错误原因 #

原代码中geom_boxplot默认使用stat="boxplot"，会自动对每个x分组计算箱线统计量，但直接将lower=y-0.5*z这类基于全数据集的参数传入时，ggplot期望的美学长度（每个分组的统计量数量）与实际传入的21个数据点长度不匹配，从而触发报错。

修正后的代码 #

library(ggplot2)

ggplot(stats4, aes(x = x, y = y, fill = p, group = interaction(x, p))) +
  scale_fill_manual(values = c("#999999", "#E69F00", "#56B4E9")) +
  xlab("") +
  ylab(expression("Estimated effect")) +
  geom_boxplot(
    aes(
      lower = y - 0.5*z,
      upper = y + 0.5*z,
      middle = y,
      ymin = y - z,
      ymax = y + z
    ),
    stat = "identity"
  ) +
  theme(legend.position = "none") +
  ylim(-4, 1) +
  theme_classic() +
  geom_hline(yintercept = 0, linetype = "dashed", color = "blue", size = 1) +
  theme(text = element_text(size = 20)) +
  coord_flip()

关键修改说明 #

• 指定独立分组：group = interaction(x, p)确保每个x与p的组合被视为独立的箱线组，避免同一x下不同p的观测被错误合并。
• 正确映射美学参数：将lower、upper、middle、ymin、ymax放入aes()内部，让ggplot识别这些是每个观测对应的属性，而非全局常量。
• 使用identity统计量：stat = "identity"是核心设置，它告诉ggplot直接使用你提供的参数绘制箱线，不再自动计算四分位数等统计量。

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