mtext()

Question

मुझे पता है कि यह आपके लिए कुछ तेज़ और सरल होगा। मैं बस mtext() का उपयोग कर क्षैतिज वाई धुरी लेबल रखना चाहता हूं। मुझे अनुमान के साथ यह करना है, लेकिन मैं इसे समझने की कोशिश कर रहे पिछले 2 घंटों को बर्बाद कर रहा हूं ... निम्नलिखित उदाहरणों में, मैं सिर्फ वाई-लेबल्स (myLab) क्षैतिज होना चाहता हूं और उचित ठहराना चाहता हूं।

myLab <- c("aaaaaaa", "bb", "c") 

par(oma=c(0,10,0,0)) # make a large left maring for the labels 

plot(x=c(1:3), 
    y=c(1:3), 
    pch="|", 
    lwd=3, 
    tck=0.01, 
    yaxt="n", 
    ylab="", 
    xlab="my legend", 
    at= c(1:3), 
    ) 


mtext(text=myLab, 
     side=2, 
     outer = FALSE, 
     at=c(1:3) 
    ) 

मुझे mtext() का उपयोग करने की आवश्यकता नहीं है। यदि आपके पास बेहतर विकल्प है, तो कृपया मुझे बताएं।

धन्यवाद!

Answer 1

लास तर्क का उपयोग करें:

mtext(text=myLab, las=1, 
     side=2, 
     outer = FALSE, 
     at=c(1:3) 
     ) 

उन्हें सही किनारे आ जाती है लेकिन myLab मूल्यों में रिक्त स्थान में पूर्ण विराम वाले पैड आप कर सकते हैं। आप छोड़ सकते हैं (बनाम 1 का डिफ़ॉल्ट मान) 0 के एक adj मूल्य का उपयोग कर का औचित्य साबित: समस्या की इस प्रकार की मैं `मेरी गति-डायल पर par` लिए

plot(x=c(1:3), 
     y=c(1:3), 
     pch="|", 
     lwd=3, 
     tck=0.01, 
     yaxt="n", 
     ylab="", 
     xlab="my legend" # removing extraneous `at` value that only throws a warning 
    ) 
mtext(text=myLab, las=1, adj=0, 
     side=2, 
     outer = FALSE, 
     line=3.5, at=1:3 
     )