我正试图在箱线图中的方框上方或下方添加代表独立变量t检验评估后显著性的星号。我该如何将其添加到我的图表中?
我正试图在箱线图中的方框上方或下方添加代表独立变量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()
并在相应位置写入内容,例如:
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)