删除箱形图中的下四分位数和上四分位数，并在R

Question

所以我试图制作一些不同的Boxplots，

完全正常的箱线图

我无法弄清楚如何创建没有较低和较高分位数的箱线图，其基本上是异常值和由胡须连接的中值。所以看起来像这样的东西

我的尝试

但我需要与胡须之间的垂直线完全连接？

我为R中的第二个剧情所做的是以下

boxplot(mpg~cyl,data=mtcars, main="Car Milage Data", xlab="Number of Cylinders", 
        ylab="Miles Per Gallon",col="white",frame=F,medcol = "black", boxlty =0, 
        whisklty = 1, staplelwd = 1,boxwex=0.4)

非常感谢。

Answer 1

以下是使用散点图和误差线获取所需内容的方法：

    library(tidyverse)

        data_summary <- data %>%
          group_by(grouping_var) %>%
          summarize(median = median(quant_var),
                max = max(quant_var),
                min = min(quant_var))

    ggplot(data_summary, aes(x = grouping_var,
                             y = median)) +
      geom_point() +
      geom_errorbar(aes(ymin = min,
                        ymax = max))

然后，如果您需要覆盖旧数据，您只需添加一个新的geom：

    ggplot(data_summary, aes(x = grouping_var,
                             y = median)) +
      geom_point() +
      geom_errorbar(aes(ymin = min,
                        ymax = max)) +
      geom_point(data = data, aes(x = grouping_var,
                                  y = quant_var))