R中具有多列整数的堆积条形图

# 安装和加载ggplot2包
install.packages("ggplot2")
library(ggplot2)

# 创建一个示例数据框df
df <- data.frame(
  category = c("A", "B", "C"),   # 类别
  variable1 = c(10, 20, 30),     # 变量1
  variable2 = c(15, 25, 35)      # 变量2
)

# 使用ggplot2创建堆积条形图
ggplot(data = df, aes(x = category)) +
  geom_bar(aes(y = variable1, fill = "Variable 1"), stat = "identity") +
  geom_bar(aes(y = variable2, fill = "Variable 2"), stat = "identity") +
  labs(title = "堆积条形图示例", x = "类别", y = "变量值") +
  scale_fill_manual(values = c("Variable 1" = "blue", "Variable 2" = "red")) +
  theme_classic()