ggplot2如何在不过滤原始数据的前提下隐藏X轴指定类别值

两种常用方式都可以满足你「不修改原始数据集、仅绘图时排除X轴Nissan类别」的需求：

方案1：最稳妥的scale参数调整（推荐） #

通过scale_x_discrete的limits参数过滤X轴展示的类别，原始数据集完全不会被修改，且Nissan的对应数据依然会参与其他图层的统计计算（比如全局均值线、整体占比等）。

示例代码： #

# 加载包
library(ggplot2)

# 示例测试数据，你可以替换成自己的cars数据集
cars <- data.frame(
  brand = c("Toyota", "Nissan", "Honda", "Ford", "BMW"),
  sales = c(1200, 980, 1150, 900, 750)
)

# 绘图
ggplot(cars, aes(x = brand, y = sales)) +
  geom_col(fill = "steelblue") +
  # 仅排除X轴的Nissan类别，不改动原始数据
  # R4.1以下版本把 \(x) 替换成 function(x) 即可
  scale_x_discrete(limits = \(x) x[x != "Nissan"]) +
  labs(x = "汽车品牌", y = "销量")

方案2：接近你期望的brand - "Nissan"调用形式 #

你可以自定义一个轻量操作符，实现类似减号排除的写法，这种写法会直接排除Nissan对应的行数据，不会参与绘图计算，同样不会修改原始数据集。

示例代码： #

# 自定义排除操作符，仅当前会话生效
`%-%` <- function(var, exclude) var[!var %in% exclude]

# 直接按你想要的形式调用
ggplot(cars, aes(x = brand %-% "Nissan", y = sales)) +
  geom_col(fill = "steelblue") +
  labs(x = "汽车品牌", y = "销量")

注意事项 #

• 方案1适合需要保留全量数据做全局统计的场景，方案2适合只需要展示排除后的数据、不需要用到Nissan数据做计算的场景
• 不建议直接覆盖R原生的-操作符实现brand - "Nissan"的写法，容易引发其他基础运算的异常

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