Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1994
*January
*February
*March
*April
*May
*June
*July
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1994

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

Search the Archive

Re: ... ShowLegend problems ...

  • To: mathgroup at yoda.physics.unc.edu
  • Subject: Re: ... ShowLegend problems ...
  • From: fred at mi.el.utwente.nl (Fred Hugen - UT)
  • Date: Wed, 9 Mar 94 10:50:33 +0100

> From mathgroup-adm at yoda.physics.unc.edu Fri Feb 25 09:59:48 1994
> Date: 21 Feb 94 16:15 -0200
> From: Antonio Jose Araujo <aaraujo at porto.inescn.pt>
> To: mathgroup at yoda.physics.unc.edu
> Subject: ... ShowLegend problems ...
> Content-Length: 310
> 
> Hi !
> 
> I am doing a graphic with MultipleListPlot and when I try to put a legend to
> the multiple curves that it contains with ShowLegend from <<Graphics'Legend' it
>  fails. How can I use ShowLegend correctly?
> 
> Thanks in advance.
> 
> ps : The problem also exists with BarChart function. Any sugestions are welcome.
> 
> 
Here is an example how to incorporate a legend into a MultipleListPlot. Its a
 pity that WRI does not support plots like MultipleListPlot with the standard
options for Plot such as Legend. Adding a Legend with ShowLegend takes a 
considerable amount of time!

PS: I use Mma 2.2.1 / Windows 3.1

				Fred Hugen
						
----------
X-Sun-Data-Type: default
X-Sun-Data-Description: default
X-Sun-Data-Name: mail.txt
X-Sun-Content-Lines: 9

<<Graphics`MultipleListPlot`
<<Graphics`Colors`
<<Graphics`Legend`

listData = Table[ x^2 - 6y x +1,{y,0,4},{x,-5,5}];
lineColors = {{Red},{Blue},{Green},{Orange},{Yellow}};
plotje = Apply[MultipleListPlot[##,PlotJoined->True,LineStyles->lineColors] &,listData];

ShowLegend[plotje,{{{Graphics[{Red,Line[{{0,0.5},{1,0.5}}]}],"y=0"},{Blue,"y=1"}},LegendShadow->{0,0}}];                                                                                                                                                                            <<Graphics`MultipleListPlot`





  • Prev by Date: Arbitrary Precision Calculation Of Pi
  • Next by Date: Mathematica Workshops in Austin, TX and Washington, D.C.
  • Previous by thread: Re: Arbitrary Precision Calculation Of Pi
  • Next by thread: Mathematica Workshops in Austin, TX and Washington, D.C.