在R语言中，在直方图的底部边缘添加轴须图

在R语言中，在直方图的底部边缘添加轴须图

在数据可视化中，直方图和箱线图（轴须图）是常用的工具，用于展示数据的分布和统计特征。直方图用于显示数据的频率分布，而箱线图则展示了数据的五个关键统计量：最小值、第一四分位数（Q1）、中位数（Q2）、第三四分位数（Q3）和最大值。在R语言中，可以将这两种图形结合起来，通过在直方图的底部边缘添加轴须图，更全面地展示数据的分布情况。

下面是一个示例代码，展示了如何在R语言中绘制带有轴须图的直方图：

# 生成随机数据
set.seed(123)
data <- rnorm(100)

# 绘制直方图
hist(data, main="Histogram with Boxplot", xlab="Value", ylab="Frequency", col="lightblue", xlim=c(min(data), max(data)))

# 计算箱线图的参数
boxplot_stats <- boxplot.stats(data)

# 绘制轴须图
boxplot(data, horizontal=TRUE, add=TRUE, at=min(data), range=0, boxwex=0.1, whisklty=2, staplelty=0, medcol="red", whiskcol="blue", outcol="black")

# 添加轴须图的标签
text(min(data), boxplot_stats$stats[1], paste("Min:", round(boxplot_stats$stats[1], 2)), pos=4)
text(min(data), boxplot_stats