R - 叠加柱状图

以下是一个使用R语言绘制叠加柱状图的示例代码：

# 创建数据框
data <- data.frame(
  category = c("A", "B", "C"),  # 类别
  value1 = c(10, 12, 8),        # 数值1
  value2 = c(5, 8, 6)           # 数值2
)

# 绘制叠加柱状图
barplot(
  height = c(data$value1, data$value2),  # 设置柱状图的高度
  names.arg = data$category,             # 设置x轴的标签
  beside = TRUE,                          # 设置叠加柱状图
  col = c("blue", "red"),                 # 设置柱状图的颜色
  legend.text = c("Value 1", "Value 2"),  # 设置图例文字
  args.legend = list(x = "topright"),     # 设置图例的位置
  ylab = "Value",                         # 设置y轴的标签
  main = "Stacked Bar Chart"              # 设置标题
)

这段代码首先创建了一个数据框，包含了三个类别和两个数值列。然后使用barplot()函数绘制叠加柱状图。height参数用于设置柱状图的高度，通过将两个数值列合并成一个向量传入。names.arg参数用于设置x轴的标签，beside参数设置为TRUE表示绘制叠加柱状图。col参数用于设置柱状图的颜色，legend.text参数用于设置图例文字，args.legend参数用于设置图例的位置。ylab参数用于设置y轴的标签，main参数用于设置标题。