Graphics--Need Help: How to show legends for graphics under Show Command?

*To*: mathgroup at smc.vnet.net*Subject*: [mg71248] Graphics--Need Help: How to show legends for graphics under Show Command?*From*: abdou.oumaima at hotmail.com*Date*: Sat, 11 Nov 2006 03:39:33 -0500 (EST)

Hello MathGroup, I'm triying to show legend to all my graphics functions but still unable to do it. Hereby a sample of my code: << Graphics`Legend` pp = Plot[Sin[x], {x, -Pi/2, Pi/2}, DisplayFunction -> Identity, PlotStyle -> Hue[0.6]]; pm = Plot[Cos[x], {x, Pi/2, 3 Pi/2}, DisplayFunction -> Identity, PlotStyle -> Hue[0.8]]; Show[{pp, pm}, DisplayFunction -> $DisplayFunction]; ShowLegend[%, Sin, Cos] How can I show legends or labels for all my graphics please. For Cosinus Function put "Cos (x) " and Sinus function graphic put "Sin (x) ". Any suggestion will veryyyyyyyyyyy welcome! Cheers. Lian. (http://lian.blog-center.com/) Link to the forum page for this post: http://www.mathematica-users.org/webMathematica/wiki/wiki.jsp?pageName=Special:Forum_ViewTopic&pid=15268#p15268 Posted through http://www.mathematica-users.org [[postId=15268]]