如何从ggplot柱状图中移除指定数据列？

你要移除的是Access列里的某个类别，有两种简单的实现方式：

方法一：提前过滤数据（推荐，数据层面彻底移除） #

直接从原始数据中剔除不需要的类别，之后再绘图。假设你要移除的类别是"要移除的名称"，可以用下面两种方式过滤数据：

用dplyr包过滤 #

library(dplyr)
# 过滤掉目标类别
filtered_data <- Access.Use %>% filter(Access != "要移除的名称")

# 基于过滤后的数据绘图（已将原标签翻译为中文）
ggplot(data = filtered_data,aes(fill=Access)) + 
  geom_bar(aes(x=Access, y = (..count..)/sum(..count..)), fill="snow3") +
  ylab("参与者占比") + xlab("可用性与使用情况") + 
  scale_y_continuous(labels = scales::percent, limits = c(0, 0.4)) + 
  theme_bw() + 
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), 
        panel.background = element_blank())

用Base R过滤 #

如果不想加载dplyr，用原生R代码也能实现：

# 过滤掉目标类别
filtered_data <- subset(Access.Use, Access != "要移除的名称")

# 后续绘图代码和上面完全一致

方法二：仅在绘图时隐藏类别（不修改原始数据） #

如果你不想改动原始数据，只需要在绘图时隐藏指定类别，可以通过scale_x_discrete()的limits参数指定要保留的类别：

ggplot(data = Access.Use,aes(fill=Access)) + 
  geom_bar(aes(x=Access, y = (..count..)/sum(..count..)), fill="snow3") +
  ylab("参与者占比") + xlab("可用性与使用情况") + 
  scale_y_continuous(labels = scales::percent, limits = c(0, 0.4)) +
  # 列出所有你想保留的类别，自动排除未列出的
  scale_x_discrete(limits = c("类别A", "类别B", "类别C")) + 
  theme_bw() + 
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), 
        panel.background = element_blank())

两种方法的区别：方法一是从数据中彻底移除目标类别，后续任何基于filtered_data的操作都不会包含它；方法二只是在本次绘图中隐藏，原始数据不受影响。

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