ggplot -使用IQR填充箱形图

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

# 准备数据集
data <- data.frame(group = rep(c("A", "B", "C"), each = 100),
                   value = c(rnorm(100), rnorm(100, mean = 2), rnorm(100, mean = 3)))

# 创建绘图对象并添加箱形图
p <- ggplot(data, aes(x = group, y = value))
p <- p + geom_boxplot(fill = "lightblue", color = "black")

# 使用IQR填充箱形图
p <- p + stat_boxplot(geom = "errorbar", width = 0.5, fill = "lightblue", color = "black")

# 添加标题和坐标轴标签
p <- p + labs(title = "Boxplot with IQR Fill",
              x = "Group",
              y = "Value")

# 显示图形
print(p)