Legends in Plots
- To: mathgroup at smc.vnet.net
- Subject: [mg6766] Legends in Plots
- From: "Laura D. Vann" <vannl at bellsouth.net>
- Date: Wed, 16 Apr 1997 02:14:59 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
I am trying to add a legend to two plots that are shown together
using the function DisplayTogether in the Graphics`Graphics` package.
I loaded the Graphics`Legend` package and tried the commands
PlotLegend and ShowLegend. In each case I get the following error
message: Graphics::optx: Unknown option PlotLegend in -Graphics-
Can anyone tell me how to do this?
This was my first attempt using PlotLegend:
In[39]:=
DisplayTogether[
ListPlot[Transpose[{wtOd3,tOd3}],AxesLabel->
{"\[Omega]", "f(\[Omega])"},PlotStyle->Dashing[{0.02}]],
ListPlot[Transpose[{wtKd3,tKd3}]],
PlotLegend -> {"Original","Known"},
PlotLabel->"Spectrum - Level d3"];
This was my second attempt using ShowLegend
In[39]:=
ShowLegend[DisplayTogether[
ListPlot[Transpose[{wtOd3,tOd3}],AxesLabel->
{"\[Omega]", "f(\[Omega])"},PlotStyle->Dashing[{0.02}]],
ListPlot[Transpose[{wtKd3,tKd3}]],
PlotLabel->"Spectrum - Level d3"],
"Original","Known"];
Any help will be much appreciated!
Laura Vann