如何在ggplot2分面柱状图中展示空因子水平及0计数？

原始数据中因子a包含A、B、C三个水平，因子b包含R、S、T、U、V五个水平，但现有数据里没有a=C和b=V的对应记录，默认绘图不会显示这些缺失的组合。要实现显示a=C分面且该分面中b=V计数为0的需求，可按以下步骤操作：

1. 补全因子水平并生成完整计数数据 #

首先将a和b转换为包含所有预设水平的因子，再生成两类因子的所有组合并统计计数（缺失组合的计数设为0）：

library(ggplot2)
library(dplyr)
library(tidyr)

# 原始数据
a <- c("A", "A", "A", "A", "B", "B", "B", "B")
b <- c("R", "R", "R", "S", "T", "T", "U", "U")
c <- 1:8
DF <- data.frame(a,b,c)

# 处理数据：补全因子水平+生成所有组合的计数
DF_full <- DF %>%
  mutate(
    a = factor(a, levels = c("A", "B", "C")),
    b = factor(b, levels = c("R", "S", "T", "U", "V"))
  ) %>%
  complete(a, b, fill = list(count = 0)) %>%
  count(a, b, name = "count")

2. 绘制分面柱状图 #

使用处理后的完整数据绘图，直接调用已统计好的count列，确保缺失组合的0值能被显示：

ggplot(data = DF_full, aes(x = b, y = count)) +
  geom_col() +
  geom_text(aes(label = count), vjust = -0.5) + # 调整文本位置避免与柱子重叠
  facet_grid(~ a, space = "free", scales = "free") +
  ylim(0, max(DF_full$count) + 0.5) # 扩展y轴范围，保证0标签可见

内容的提问来源于stack exchange，提问作者Daniel Valencia C.