如何在箱形图顶部的离散x轴上覆盖更大的箱线图？

Question

我可以使用ggplot2来生成这样的图，但它有点令人困惑，因为较大的框不能覆盖x的整个范围，人们将其解释为排除第一组和最后一组数据。与width=一起使用时，geom_boxplot不响应aes(group=1)参数。下面给出一个例子。

library(ggplot2)
p <- ggplot(mpg, aes(class, hwy))
p +geom_boxplot()+geom_boxplot(aes(group=1),width=0.1,col="red",fill=NA)

我还在ggplot2 github repository中打开了一个问题。

Answer 1

使用数字x值，而不进行分组：

nlevels <- length(unique(mpg$class))

ggplot(mpg, aes(class, hwy))
  geom_boxplot()+
  geom_boxplot(aes(x = median(1:nlevels)), width = nlevels, col = "red", fill = NA)