Re: Help With PlotLegend, please.
- To: mathgroup at smc.vnet.net
- Subject: [mg14349] Re: [mg14324] Help With PlotLegend, please.
- From: BobHanlon at aol.com
- Date: Thu, 15 Oct 1998 00:28:53 -0400
- Sender: owner-wri-mathgroup at wolfram.com
It works properly if you use AbsoluteThickness rather than Thickness:
Needs["Graphics`Legend`"];
f[x_] := Sin[x];
g[x_] := Cos[x];
h[x_] := Sin[x] * Cos[x];
xlow = 0; xhigh = 4 Pi;
Plot[{f[x], g[x], h[x]}, {x, xlow, xhigh},
PlotStyle -> {RGBColor[1, 0, 0],
{RGBColor[0, 1, 0], Dashing[{.02}]},
{RGBColor[0, 0, 1], AbsoluteThickness[2]}},
PlotLegend->{"f(x)", "g(x)", "h(x)"},
LegendPosition -> {-1, -1.2}, LegendSize -> {1.7, .5}];
Bob Hanlon
In a message dated 10/13/98 5:13:10 AM, arc at astro.columbia.edu wrote:
>I am plotting three curves on the same 2D plot and wish to plot a legend
>below that indicates which is which. The problem I'm having is that
>more darkly shaded lines (using the Thickness[] option) do not appear
>any darker or thicker on the legend, which makes distinguishing the
>solid lines in the plot impossible.