मुझे यकीन है कि क्या नियम हैं नहीं कर रहा हूँ एक और, अलग जवाब एक ही प्रश्न के लिए जोड़ने के लिए । लेकिन यह करने के लिए एक और अलग तरीका है। अगर मुझे इसे अपने पहले जवाब में जोड़ना है, तो मैं ऐसा कर सकता हूं।
आप पाठ आदेशों का उपयोग करके हाथ से टेक्स्ट लेबल जोड़ सकते हैं। मुझे लगता है कि यह बेहतर दिखता है।
Clear[x];
funs = {Exp[x], 2^x, 3^x};
funNames = Style[#, 12] & /@ funs;
(*the x-axis plot range used *)
from = -5; to = 2;
(* generate the coordinates at the end of the plot lines*)
pos = Map[{to, #} &, funs /. x -> to];
(*generate the text labels *)
text = Map[Text[#[[1]], #[[2]], {-1, 0}] &, Thread[{funNames, pos}]];
प्लॉट अंतिम परिणाम (गद्दी का एक छोटा रेंज साजिश को जोड़ा गया है, ताकि लेबल जोड़े गए पूरी तरह से देखा जाता है)
Plot[funs, {x, from, to},
PlotRangePadding -> {1, 1},
PlotStyle -> {Red, Green, Blue},
PlotRange -> All,
Epilog -> text
]
अद्यतन (: यहाँ एक तरीका है 1)
सैम ने एक सरल तरीके से नीचे पूछा। मुझे अब यकीन नहीं है। लेकिन इस विधि का उपयोग करना आसान बनाने का एक तरीका है, एक फ़ंक्शन बनाना है और फिर पाठ लेबल उत्पन्न करने के लिए एक बार इस फ़ंक्शन को कॉल करना है। आप यह फ़ंक्शन डाल सकते हैं जहां आप अपने सभी अन्य कार्यों को हर समय उपयोग करते हैं, और बस इसे कॉल करें।
यहाँ कुछ है: सबसे पहले समारोह
(*version 1.1*)
myLegend[funs_List, (*list of functions to plot*)
x_, (*the independent variable*)
from_?(NumericQ[#] && Im[#] == 0 &),(*the x-axis starting plot range*)
to_?(NumericQ[#] && Im[#] == 0 &) (*the x-axis ending plot range*)
] := Module[{funNames, pos, text, labelOffset = -1.3},
(*make label names*)
funNames = Style[#, 12] & /@ funs;
(*generated the coordinates at the end of the plot lines*)
pos = Map[{to, #} &, funs /. x -> to];
(*generate the Text calls*)
text = Map[Text[#[[1]], #[[2]], {labelOffset, 0}] &,
Thread[{funNames, pos}]]
];
बारे में और अब सिर्फ किसी भी समय आप लेबल के साथ प्लॉट करने के लिए चाहते हैं तो ऊपर कहते हैं। यह कोड की केवल 1-2 अतिरिक्त लाइनें होगी।इस तरह:
आप इसे संशोधित कर सकते हैं के रूप में आप चाहते हैं:
Clear[x]
from = -5; to = 2;
funs = {Exp[x], 2^x, 3^x};
Plot[funs, {x, from, to}, PlotRangePadding -> {1, 1},
PlotStyle -> {Red, Green, Blue}, PlotRange -> All,
Epilog -> myLegend[funs, x, from, to]]
यहाँ कुछ उदाहरण हैं।
हालांकि यह ग्राफिक्स [प्लॉट के बजाय], [यह] (http://stackoverflow.com/a/7547457 का उपयोग करता है/353410) आपको कुछ विचार दे सकते हैं –
संभावित डुप्लिकेट [मैं गणित में विभिन्न घटता कैसे लेबल करूं?] (Http://stackoverflow.com/questions/7221315/how-do-i-label- अलग-curves-in -मैथेमैटिका) – abcd