Comment dessiner une boîte à moustaches dont les agrafes ressemble à un support carré R

Question

Comment dessiner une boîte à moustaches comme ceci:

font les agrafes, la marque de données dans 1,5 IQR du bas/quartile supérieur, ressemble à un crochet carré.

J'ai essayé:

bx = sapply(5:1, function(x) rnorm(100, x, sqrt(x))) 

boxplot(bx, col = "gray", pch = "", boxwex = 0.3, 
    medlwd = rep(3, 4), medcol = rep("white", 4), 
    outlty = 1, outwex = 1, 
    whisklty = 1, 
    staplelty = 1, staplewex = 1, 
    names = paste0("mu = ", 5:1)) 

title(main = "n = 100") 

---

Answer 1

Je ne crois pas qu'il soit possible de le faire avec staplelty. Cependant, vous pouvez simplement dessiner l'agrafe en tant que ligne horizontale et ajouter les graduations verticales.

boxplot(iris[,1:4], outlty=1, pch="") 

for(i in 1:4) { 
    segments(c(i-0.2,i+0.2), BP$stats[5,i], c(i-0.2,i+0.2), BP$stats[5,i] - 0.1) 
    segments(c(i-0.2,i+0.2), BP$stats[1,i], c(i-0.2,i+0.2), BP$stats[1,i] + 0.1) 
}