如何在R的ggplot2中隐藏特定Y轴标签（无需修改源数据）

先纠正你原代码里的两个问题：

• 主题设置语法错误：应该直接用 + theme(...)，而非 + (themes = list(...))
• element_blank() 会隐藏所有Y轴标签，不符合你只想隐藏5000的需求

要只隐藏特定Y轴标签且不修改源数据，你可以通过scale_y_continuous()的labels参数自定义标签生成逻辑，具体代码如下：

library(ggplot2)
library(dplyr)

diamonds %>% 
  ggplot(aes(table)) +
  geom_histogram() +
  labs(
    x = "scores",
    y = "Frequency"
  ) +
  scale_y_continuous(labels = function(x) {
    # 仅将值为5000的标签替换为空字符串
    ifelse(x == 5000, "", x)
  })

补充说明 #

如果Y轴上的5000不是精确刻度值（比如是近似生成的），可以用模糊匹配的方式，设置一个小阈值：

scale_y_continuous(labels = function(x) {
  ifelse(abs(x - 5000) < 10, "", x) # 匹配与5000差值小于10的刻度
})

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