MathGroup Archive 1998

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Help With PlotLegend, please.

  • To: mathgroup at
  • Subject: [mg14349] Re: [mg14324] Help With PlotLegend, please.
  • From: BobHanlon at
  • Date: Thu, 15 Oct 1998 00:28:53 -0400
  • Sender: owner-wri-mathgroup at

It works properly if you use AbsoluteThickness rather than Thickness:

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 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.

  • Prev by Date: Re: Mathmatica Problem...
  • Next by Date: Re: Numerical solution to Schrodinger's Equation
  • Previous by thread: Re: Help With PlotLegend, please.
  • Next by thread: Re: Help With PlotLegend, please.