Re: Using ShowLegend

*To*: mathgroup at smc.vnet.net*Subject*: [mg24965] Re: [mg24958] Using ShowLegend*From*: BobHanlon at aol.com*Date*: Mon, 28 Aug 2000 08:27:23 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

In a message dated 8/25/2000 12:19:48 AM, kspk at my-deja.com writes: >I have created a plot with 3 curves. I want to associate a legend with >these curves - the legend must contain a full line and two broken lines >with varying lengths of the dashes. > >I cannot use PlotLegend because the curves are created inside a Table >command. ShowLegend seems to be the way to go, but I can't make >it go thru. Can someone post a simple example of ShowLegend containing >multiple curves with a corresponding legend? > PlotLegend has no way of knowing whether the curves were created inside a Table. Needs["Graphics`Legend`"]; Plot[Evaluate[Table[Sin[k*x], {k, 3}]], {x, 0, 2 Pi}, PlotStyle -> {RGBColor[1, 0, 0], {RGBColor[0, 1, 0], AbsoluteDashing[{5, 5}]}, {RGBColor[0, 0, 1], AbsoluteDashing[{4, 5, 2, 5 }]}}, PlotLegend -> Table["Sin[" <> ToString[k*x] <> "]", {k, 3}], ImageSize -> {500, 340}]; Bob Hanlon