將統計信息添加到圖形的底部

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一點點推下字幕的情節。