将统计信息添加到图表的底部

Question

我尝试将关于给定分布的统计信息（最小值，最大值，四分位数值，平均值，中位数等）添加到R的底部图（直方图，时间序列图）中。 我知道可以使用summary（）函数生成统计数据。但是，有没有人知道如何将这些信息放在图表的底部？

它似乎应该很容易做但我在网上找不到任何关于如何做的事情。甚至可以使用R？

感谢任何帮助！

Answer 1

这是一种方法。对于一些虚拟数据

set.seed(2)
dat <- rnorm(100, mean = 3, sd = 3)

计算摘要

sdat <- summary(dat)

然后我们可以使用paste()和collapse将这些名称粘贴到一个字符串

summStr <- paste(names(sdat), format(sdat, digits = 2), collapse = "; ")

请注意，我使用format()将统计信息的值格式化为仅有两位有效数字。这可以添加到情节中，例如字幕使用title()函数

op <- par(mar = c(7,4,4,2) + 0.1)
hist(dat)
title(sub = summStr, line = 5.5)
par(op)

我通过参数line将字幕按下了一点点。