ggplot2饼图缺口问题：分面展示产品X上市前后市场份额

核心问题分析 #

• 未添加产品X的0值行时，0时期的饼图因缺失对应类别，会出现图例与可视化不匹配的情况；若数据总和逻辑存在偏差，也可能导致饼图不闭合。
• 添加0值行后，geom_text会自动渲染0%的标签，破坏视觉整洁度。

修复方案 #

1. 修正代码笔误与无效参数 #

原代码中+n geom_text为输入错误，需改为+ geom_text；同时scale_fill_brewer(palette="time_period")的调色板名称无效，替换为ggplot2内置调色板（如"Set2"）。

2. 隐藏0值份额标签 #

在geom_text的label参数中通过ifelse判断，当Share_x为0时不生成标签：

aes(label = ifelse(Share_x > 0, paste0(round(Share_x*100, 2), "%"), ""))

3. 确保饼图闭合（可选优化） #

添加产品X的0值行后，需保证每个分面的sales总和为该时期真实总销量（0时期产品X的sales设为0即可满足）。若仍存在闭合问题，可微调coord_polar的start参数校准角度。

完整修正代码 #

ggplot(df_graph, aes(x = "", y = sales, fill = Product.Name)) +
  geom_bar(stat = "identity", width = 1) +
  coord_polar(theta = "y") +
  scale_fill_brewer(palette = "Set2") +  # 替换为有效内置调色板
  facet_wrap(~before_1345) +
  theme_void() +
  theme(
    legend.position = "bottom", 
    text = element_text(family = "Times New Roman", size = 12, color = "black"),
    plot.margin = margin(c(10, 1, 10, 1))
  ) +
  geom_text(
    aes(label = ifelse(Share_x > 0, paste0(round(Share_x*100, 2), "%"), "")),
    family = "Times New Roman", size = 4,
    position = position_stack(vjust = 0.6), color = "black", angle = 45
  ) +
  labs(fill = "Product")

额外优化建议 #

• 若无需在0时期饼图中保留产品X的颜色占位，可直接过滤掉before_1345 == 0且Product.Name == "产品X"的行，同时设置scale_fill_brewer(drop = FALSE)保留完整图例，既避免0值标签，又保证图例统一。
• 若市场份额是基于sales计算得出，直接用Share_x作为y值（总和为1）更贴合饼图逻辑：

ggplot(df_graph, aes(x = "", y = Share_x, fill = Product.Name)) +
  geom_bar(stat = "identity", width = 1) +
  # 后续代码同上

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