Re: PlotLabel
- To: mathgroup at smc.vnet.net
- Subject: [mg36344] Re: [mg36321] PlotLabel
- From: Tomas Garza <tgarza01 at prodigy.net.mx>
- Date: Mon, 2 Sep 2002 04:08:56 -0400 (EDT)
- References: <200208310526.BAA28718@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Try the following (I'm quoting from Tom Wickham-Jones' book on Mathematica
Graphics, p. 41):
In[1]:=
pl[p_] := Plot[Sin[x^p], {x, 0, Pi},
PlotLabel -> StringForm["p = `1`", p],
DisplayFunction -> Identity]
In[12]:=
Table[Show[pl[k], DisplayFunction -> $DisplayFunction],
{k, 3}]
Tomas Garza
Mexico City
----- Original Message -----
From: "André Giroux" <giroux at dms.umontreal.ca>
To: mathgroup at smc.vnet.net
Subject: [mg36344] [mg36321] PlotLabel
> Hi all.
> I plot several curve depending on a parameter p and I want the PlotLabel
to
> show the value of p.
> What is wrong with the following ?
>
> pl[p_]:=Plot[Sin[x^p],{x,0,Pi},PlotLabel\[Rule] "p = " p,
> DisplayFunction\[Rule]Identity]
>
> Table[Show[pl[k],DisplayFunction\[Rule]$DisplayFunction],{k,3}]
>
> Cheers
>
>
>