R 如何将星号添加到箱线图中以表示重要性？

我试图在箱线图的方框顶部或底部包含一个星号，表示执行独立变量t检验评估后的显著性。如何将其添加到图表中

您可以使用

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)

如果事先知道，您可以使用

text（）

并在相应的位置书写；e、 g

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)

---

这不适用于多个箱线图，或者我遗漏了什么？（+1）有趣的是，我忽略了这一点。（+1）@chl:你的解决方案很好（呃）。

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