R 将异常值显示为百分比

如何在箱线图中将异常值显示为百分比

我不想看到异常值显示为点。我希望看到异常值在箱线图中显示为数字百分比。下图显示了我想要异常值的方式：

---

这里有一个解决方案：我们使用箱线图的输出计算异常值的数量，从图中删除异常值，然后绘制比例

# simulate data
x <- rnorm(1000)
# first boxplot to get the stats
p <- boxplot(x)

# computing the proportion of outliers
outsiders <- data.frame(text= paste0(c(length(p$out < p$stats[1])/p$n,length(p$out > p$stats[5])/p$n)*100,"%"),
                        y = p$stats[c(1,5)])

# real plot
boxplot(x,outline=FALSE,ylim=c(p$stats[1]-1,p$stats[5]+1))
# we add the text in two steps because we need different adj
text(x=1,labels=outsiders$text[1],y=outsiders$y[1],adj=c(0,1))
text(x=1,labels=outsiders$text[2],y=outsiders$y[2],adj=c(0,-.5))

#模拟数据
欢迎来到StackOverflow！请阅读相关信息以及如何给出建议。这将使其他人更容易帮助你。作为一个离群值意味着（大致上）它超出了点总数的给定百分比。所以我不明白你所说的将异常值显示为百分比是什么意思。你能提供一个数字例子吗？非常感谢你的帮助！如何将百分比四舍五入到小数点后一位或最接近的整数？使用
round（）
：
round（c（长度（p$outp$stats[5]）/p$n）*100,1）
；将1更改为0表示最接近的整数