绘制堆叠条形图并添加百分比文本标签的R语言实现

绘制堆叠条形图并添加百分比文本标签的R语言实现

堆叠条形图是一种常用的数据可视化方式，可以展示多个类别的数据在不同组之间的比较，并提供每个类别在组内的分布信息。在堆叠条形图中添加百分比文本标签可以更直观地呈现每个类别在整体中的占比情况。下面我将详细介绍如何使用R语言绘制堆叠条形图，并在每个堆叠条形图的内部居中添加百分比文本标签。

首先，我们需要准备绘制堆叠条形图所需的数据。假设我们有一个数据框df，其中包含多个类别（category）和每个类别在不同组（group）下的数值（value）。下面是一个示例数据框的结构：

df <- data.frame(
  category = c("A", "B", "C"),
  group1 = c(20, 30, 40),
  group2 = c(15, 25, 35),
  group3 = c(10, 20, 30)
)

接下来，我们使用ggplot2包来创建堆叠条形图。首先，我们需要将数据框转换成适合绘制堆叠条形图的长格式。可以使用tidyverse包中的tidyr函数来完成这一转换：

library(tidyverse)

df_long <- df %>% 
  pivot_longer(cols = starts_with("group"), names_to = "group", values_to = "value")

现在，我们可以使用ggplot2包来绘制堆叠条形图。首先，创建一个基础图层，设置x轴为category，y轴为