如何使用geom_bar为无对应数值的因子绘制空条形图？

这个场景我太熟悉了！分面时ggplot会自动汇总所有面板的因子水平，所以能保留完整的填充图例和对应条形，但单独绘图时默认只处理当前数据里存在的行——哪怕因子本身有那些水平。下面给你两种靠谱的解决方法：

方法1：补全数据行（推荐，能生成空条形） #

核心思路是给每个数据集补充所有因子水平的行，缺失的数值设为0（或NA），这样绘图时就会出现对应空条形。用tidyr::complete就能轻松实现：

library(tidyverse)

# 先定义你的数据
df1 <- data.frame(var=letters[1:3],val=1:3)
df2 <- df1[-1,]

# 合并并补全所有id+var的组合，缺失val填0
full_data <- bind_rows(df1 = df1, df2 = df2, .id = "id") %>%
  complete(id, var, fill = list(val = 0))

# 绘制df1的图
full_data %>%
  filter(id == "df1") %>%
  ggplot(aes(x = 1, y = val, fill = var)) +
  geom_bar(stat = "identity", position = "fill")

# 绘制df2的图
full_data %>%
  filter(id == "df2") %>%
  ggplot(aes(x = 1, y = val, fill = var)) +
  geom_bar(stat = "identity", position = "fill")

这样df2的图里，因子a对应的条形高度为0（在position="fill"下占比为0，但图例里会保留它的颜色，如果你换成position="stack"，空条形的位置会更直观）。

方法2：强制设置填充刻度的范围（仅保留图例） #

如果你不需要实际的空条形，只是想让图例显示所有因子水平，可以直接在绘图时指定scale_fill_discrete的limits参数，强制使用完整的因子水平：

# 绘制df2的图，保留所有因子水平的图例
ggplot(df2, aes(x = 1, y = val, fill = var)) +
  geom_bar(stat = "identity", position = "fill") +
  scale_fill_discrete(limits = levels(df1$var))

这种方法不用修改数据，但不会生成空条形，只是保证图例的完整性。

为什么分面能自动实现？ #

因为分面时ggplot会自动识别所有面板的因子水平集合，统一应用到所有子图上，所以即使某个面板没有对应行，也会保留该因子的填充配置~

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