r - 中央値、第 1 四分位、および最後の四分位の箱ひげ図に値を入れる方法は?

Question

boxplot に値を入れてその幅を制御する方法は?

X<-c(1,2,,3,4,4,5,5,6,6,6,6,6,7)

最小、最大、第 1 四分位、中央値、および最後の四分位の値を書き込む必要があります。どうすればそこに置くことができますか？

Answer 1

horizontal = TRUE水平ボックスプロットを取得しaxes = FALSE、軸を削除するために使用できます。staplewex = 1ステープルの幅をボックスの幅と同じに設定します

次にfivenum、ボックスプロットの作成に使用された統計を返すために使用し、これらをテキストラベルとして使用して、y必要なものが得られるまで値をいじることができます

boxplot(X, horizontal = TRUE, axes = FALSE, staplewex = 1)
text(x=fivenum(X), labels =fivenum(X), y=1.25)

3サンプルデータに欠落している値を挿入したことに注意してくださいX

Answer 2

例のように外れ値がないと仮定すると、mnel が提供する答えは完璧です。その場合、上下のひげは最小値と最大値に等しくなります。ただし、外れ値がありrange = 0、boxplot 関数で指定しないと、ラベルの正しい値が得られません。代わりに、次を使用できます。

text(x=boxplot.stats(X)$stats, labels = boxplot.stats(X)$stats, y = 1.25)

例を見てみましょう：

水平に

X <- c(1,2,3,3,4,4,5,5,6,6,6,6,10,15)
boxplot(X, horizontal = TRUE, axes = FALSE, staplewex = 1)

1. 不適切な値text(x = fivenum(X), labels = fivenum(X), y = 1.25)

2. 正しい値:text(x = boxplot.stats(X)$stats, labels = boxplot.stats(X)$stats, y = 1.25)

縦に

内部で x と y の引数を切り替えますtext。

boxplot(X, axes = FALSE, staplewex = 1)
text(y = boxplot.stats(X)$stats, labels = boxplot.stats(X)$stats, x = 1.25)