平均値を線として表示するボックスプロット

Question

標準ボックスプラット関数Rの平均値と中央値の両方を示すボックスプロットを作成できますか？私の現在のソリューションは、クロスのように平均値表示：

set.seed(1234) 
values <- runif(10,0,1) 
boxplot(values) 
points(mean(values),col="red",pch=4,lwd = 4) 

Answer 1

をできます

set.seed(753) 
df <- data.frame(y=rt(100, 4), x=gl(5, 20)) 
bx.p <- boxplot(y~x, df) 
bx.p$stats[3, ] <- unclass(with(df, by(y, x, FUN = mean))) 
bxp(bx.p, add=T, boxfill="transparent", medcol="red", axes=F, outpch = NA, outlty="blank", boxlty="blank", whisklty="blank", staplelty="blank") 

説明を経由して@scs：

bxp$statsは行列を返します各ボックスプロットの下部ウィスカー、下部ヒンジ、中央値、上部ヒンジおよび上部ウィスカーの極値を含む。上記の解決方法では、bx.p$stats[3, ]で指定された中央値を平均値で上書きします。 bxp関数は、boxplotオブジェクトをプロットする関数です。

結果：

Answer 2

をboxplotのデフォルトのプロットは、ボックスの幅がx-axisに1.2に0.8から行くことができます。

あなたは、したがって、以下のコードでの平均のためのラインを描くことができます。あなたも重ねてプロットし、完全を期すために

lines(c(0.8, 1.2), rep(mean(values), 2), col="red", lwd = 2)