在图表底部添加统计信息。

Question

我正在尝试将有关给定分布的统计信息（最小值，最大值，四分位数值，平均值，中位数等）添加到 R 中图表（直方图，时间序列图）的底部。我知道可以使用summary()函数生成统计数据。然而，有人知道如何将这些信息放在图表的底部吗？似乎应该很容易实现，但我无法在网上找到有关如何实现它的任何信息。使用R是否可能实现？非常感谢您提供的任何帮助！

- MNaughton

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，我稍微将字幕向下推了一点。

- Gavin Simpson

---

非常感谢！像魔法一样好用 :) - MNaughton