使用R标记箱形图中的四分位数

Question

我绘制了方框图，并用四分位数和最小-最大值标记它。它在一些专栏中表现良好；然而，对于某些列，stats值与boxplot统计数据并不完全匹配。

例如，summary命令给出的median值为2320，而boxplot.stats给出的是值2319.5。

我使用Statlog (German Credit Data) Data Set进行信用风险评分。

数据集链接：https://archive.ics.uci.edu/ml/datasets/statlog+(德语+信用+数据(

Answer 1

不同的函数可以对值进行不同的格式化。打印值基于options("digits")中设置的值，该值通常约为7位有效数字(不是小数位数(，但很少是精确值。除了系统设置之外，该功能还可以设置不同的数值来显示数字。查看内部存储的整个值的唯一方法是使用dput():

set.seed(42)
x <- runif(25)
summary(x)
#    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
# 0.08244 0.45774 0.65699 0.61295 0.91481 0.98889 
dput(summary(x))
# structure(c(Min. = 0.0824375580996275, `1st Qu.` = 0.45774177624844, 
# Median = 0.656992290401831, Mean = 0.612946688365191, `3rd Qu.` = 0.914806043496355, 
# Max. = 0.988891728920862), class = c("summaryDefault", "table"))
boxplot.stats(x)
# $stats
# [1] 0.08243756 0.45774178 0.65699229 0.91480604 0.98889173
# 
# $n
# [1] 25
# 
# $conf
# [1] 0.5125600 0.8014246
# 
# $out
# numeric(0)
# 
dput(boxplot.stats(x))
# list(stats = c(0.0824375580996275, 0.45774177624844, 0.656992290401831, 
# 0.914806043496355, 0.988891728920862), n = 25L, conf = c(0.51255998195149, 
# 0.801424598852172), out = numeric(0))

请注意，这两个函数计算的中值相同，但boxplot.stats打印出更多的小数位数。除了中位数之外，分位数的另一个因素是有不同的计算方法。quantile函数提供了9种不同的方法(请参见?quantile(。