मैं आर पर एक साजिश पर ग्रंथों के लिए सुपरस्क्रिप्ट कैसे शामिल करूं?

Question

मैं इसे इस तरह देखने की जरूरत है:

आर^2 = कुछ मान

और मैं नीचे दिए गए कोड की कोशिश की है, लेकिन यह काम नहीं होगा, क्योंकि यह "आर (अभिव्यक्ति (बाहर आया^2)) कुछ मान "= बजाय:

text (25, 200, paste ("R (expression (^2)) =", round (rsquarelm2, 2))) 

Answer 1

आप एक चरित्र वेक्टर नहीं करना चाहते, लेकिन एक अभिव्यक्ति है, इसलिए इस

expression(R^2 == 0.85) 

तुम क्या जरूरत है। इस मामले में, आप किसी अन्य आर ऑपरेशन के परिणामस्वरूप प्रतिस्थापित करना चाहते हैं। इसके लिए आप substitute() या bquote() चाहते हैं।

rsquarelm2 <- 0.855463 
plot(1:10, 1:10, type = "n") 
text(5, 5, bquote(R^2 == .(round(rsquarelm2, 2)))) 

bquote() के साथ, .() में कुछ भी मूल्यांकन किया जाता है और में अभिव्यक्ति लौटे परिणाम शामिल किया गया है: मैं बाद आसान के साथ काम करने लगता है।

Answer 2

paste फ़ंक्शन एक स्ट्रिंग देता है, अभिव्यक्ति नहीं। मैं इस तरह के मामलों के लिए bquote का उपयोग करना पसंद:

text(25, 200, bquote(R^2 == .(rs), list(rs=round(rsquarelm2,2)))) 

Answer 3

कैसे भूखंडों में स्वरूपण और गणितीय मूल्यों को शामिल करने के FAQ 7.13 है।

उदाहरण के लिए, यदि ahat अपने पैरामीटर का एक आकलनकर्ता है ब्याज की a, का उपयोग

title(substitute(hat(a) == ahat, list(ahat = ahat)))

(ध्यान दें कि यह ‘==’ और नहीं ‘=’ है)। कभी कभी bquote(), एक और अधिक संक्षिप्त रूप देता है जैसे title(bquote(hat(a) = .(ahat)))

जहां ‘.()’ में संलग्न subexpressions उनके मूल्यों ने ले ली है।

demo(plotmath) भी उपयोगी है।

---

इस मामले में, आप उपयोग कर सकते हैं या तो

title(substitute(R^2 = rsq, list(rsq = format(rsquarelm2, digits = 2)))) 

या

title(bquote(R^2 == .(format(rsquarelm2, digits = 2)))) 

(format, अधिक round से यहाँ उचित है के बाद से आप कैसे मूल्य बल्कि प्रदर्शित किया जाता है को नियंत्रित करना चाहते मूल्य का अनुमान लगाने के बजाय।)