绘制带百分比标签的条形图 - R语言实现

绘制带百分比标签的条形图 - R语言实现

在数据可视化中，条形图是一种常用的工具，用于比较不同类别的数据。为了更清晰地表示每个类别的比例，我们可以添加百分比标签到条形图上。本文将介绍如何使用R语言在条形图上添加百分比标签。

首先，我们需要准备一些示例数据。假设我们有一个销售部门的数据集，其中包含了不同产品的销售量。我们的目标是创建一个条形图来显示每个产品的销售百分比。

# 准备示例数据
products <- c("Product A", "Product B", "Product C", "Product D")
sales <- c(150, 300, 450, 200)

# 计算百分比
total_sales <- sum(sales)
percentages <- sales / total_sales * 100

# 创建条形图
barplot(sales, names.arg = products, xlab = "Products", ylab = "Sales", main = "Sales by Product")

# 添加百分比标签
text(barplot(sales, names.arg = products), sales, labels = paste0(round(percentages), "%"), pos = 3)