如何移除ggdist绘图中重复的侧边轴标签？

当使用ggplot2调用ggdist的stat_slabinterval函数，绘制按Class分面、坐标翻转的多组密度区间图时，常会出现侧边Y轴标签与顶部分面标题重复的情况，冗余信息会干扰图表可读性。

示例代码与问题复现 #

以mtcars数据集为例（新增Class分组列），原绘图代码如下：

library(ggplot2)
library(ggdist)

# 构造示例数据集
mtcars$Class <- factor(mtcars$cyl, labels = c("4缸", "6缸", "8缸"))

# 原绘图代码
ggplot(mtcars, aes(y = Class, x = mpg)) +
  stat_slabinterval() +
  facet_wrap(~Class, scales = "free_y") +
  coord_flip()

运行后每个分面左侧的Y轴标签会和顶部的分面标题完全重复，造成信息冗余。

解决方案 #

通过在theme()中设置axis.text.y = element_blank()即可移除侧边的冗余标签，若不需要Y轴标题，也可一并隐藏：

ggplot(mtcars, aes(y = Class, x = mpg)) +
  stat_slabinterval() +
  facet_wrap(~Class, scales = "free_y") +
  coord_flip() +
  theme(
    axis.text.y = element_blank(),  # 移除侧边重复的Y轴文本标签
    axis.title.y = element_blank()  # 可选：隐藏Y轴标题，进一步简化图表
  )

原理：分面标题已经清晰展示了分组信息，侧边Y轴标签属于重复内容，element_blank()会将对应元素设为空白，从而消除冗余。

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