Re: Problems with ShowLegend
- To: mathgroup at smc.vnet.net
- Subject: [mg78680] Re: Problems with ShowLegend
- From: dh <dh at metrohm.ch>
- Date: Sat, 7 Jul 2007 05:52:17 -0400 (EDT)
- References: <f6krnr$l77$1@smc.vnet.net>
Hi Mattew,
this works in version 6:
Needs["PlotLegends`"]
g1=Plot[Sin[x],{x,0,10}];
g2=Plot[Tan[x],{x,0,10}];
Show[{g1,g2}];ShowLegend[g3,{{{Red,"Vt=15Knots"},{Blue,"Vt=10Knots"},{Green,"Vt=14Knots"},{Yellow,"Vt=6Knots"}}},LegendPosition->{1,1}]
hope this helps, Daniel
mattew wrote:
> Hi everybody, firstable thanks for answering in my previous post even if, as you let me noticed, I could have solved the problem by myself having a look at the basics of mathematica (even if the first approach is quite difficult!).
> Now I'm experimenting troubles with ShowLegend, and I tried hard to make it work but the documentation is terrible...i tried to copy an example that DH posted in a previous discussion:
>
> ShowLegend[g, {{{Red, "Vt=15Knots"}, {Blue, "Vt=10Knots"}, {Green,
> "Vt=14Knots"}, {Yellow, "Vt=6Knots"}}}, LegendPosition -> {1, 1}]
>
> where g is the result of
>
> g = Show[g6, g10, g14, g16]
>
> a Show command over four previous plotted graphics (it works without problems).
>
> All I get back from the code I posted above is the following output:
>
> ShowLegend[ /*here comes a little figure representing g*/,
> {{{RGBColor[1, 0, 0], "Vt=15Knots"}, {RGBColor[0, 0, 1],
> "Vt=10Knots"}, {RGBColor[0, 1, 0],
> "Vt=14Knots"}, {RGBColor[1, 1, 0], "Vt=6Knots"}}},
> LegendPosition -> {1, 1}]
>
> while I should have, I guess, my graphic g back with the legend on it...any idea of what I'm missing?
>