r - 有意性を表すために箱ひげ図にアスタリスクを追加するにはどうすればよいですか?

Question

独立変数の t 検定評価を実行した後の有意性を表す boxplot グラフのボックスの上または下にアスタリスクを含めようとしています。これをグラフに追加するにはどうすればよいですか?

Answer 1

text()プロット上のカスタム位置に単純なシンボルを追加するために使用できます:

boxplot(c(1:10),ylim=c(0,12),axes=F)
text(11,"*",cex=2)

編集: @chl の提案への返信として、一連の箱ひげ図を使用した上記のアプリケーションを次に示します。

boxplot(count ~ spray,data = InsectSprays,axes=F,ylim=c(0,30))
text(c(25,23,-10,-10,-10,27),"*",cex=2)

Answer 2

text()事前に知っていれば、対応する場所で使用して書き込むことができます。例えば、

dfrm <- data.frame(y=rnorm(100, mean=10), x=gl(4, 25))
dfrm$y[dfrm$x==2] <- dfrm$y[dfrm$x==2]+2
boxplot(y ~ x, data=dfrm, ylim=c(min(dfrm$y)-.5, max(dfrm$y)+.5))
text(x=2, y=max(dfrm$y[dfrm$x==2]), "*", pos=3, cex=1.2)

ニーズx=2に合わせて調整します。

mtextまたは、次のように、プロット領域の外に星を配置するために使用できます

mtext("*", side=3, line=0, at=2, cex=1.2)