महत्व का प्रतिनिधित्व करने के लिए मैं बॉक्सप्लॉट में एस्टरिक्स कैसे जोड़ूं?

Question

मैं बॉक्सप्लॉट ग्राफ़ में एक बॉक्स के ऊपर या नीचे एक एस्टेरिक्स शामिल करने की कोशिश कर रहा हूं जो स्वतंत्र परिवर्तनीय टी-टेस्ट मूल्यांकन करने के बाद महत्व का प्रतिनिधित्व करता है। मैं इसे अपने ग्राफ में कैसे जोड़ सकता हूं?

Answer 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) 

Answer 2

आप भूखंड पर कस्टम स्थान पर सरल प्रतीकों को जोड़ने के लिए text() उपयोग कर सकते हैं:

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

संपादित करें: जवाब में सुझाव @chl के लिए, यहाँ boxplots की एक श्रृंखला के साथ ऊपर अनुप्रयोग है :

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