Как добавить звездочку в ящик для представления значимости?

Я пытаюсь включить астерикс сверху или снизу окна в графе boxplot, которые представляют значимость после выполнения независимой оценки t-теста переменной. Как я могу добавить это на свой график?

Ответ 1

Вы можете использовать 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)

Ответ 2

Вы можете использовать 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)