RE: PlotLabel
- To: mathgroup at smc.vnet.net
- Subject: [mg36356] RE: [mg36321] PlotLabel
- From: "Florian Jaccard" <jaccardf at eicn.ch>
- Date: Mon, 2 Sep 2002 04:09:31 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
This works :
pl[p_] := Plot[Sin[x^p], {x, 0, Pi},
DisplayFunction -> Identity]
lab[p_] := Graphics[{Text["p = ", {1.5, 1.2}], Text[p, {1.7, 1.2}]}]
Table[Show[{pl[k], lab[k]}, DisplayFunction -> $DisplayFunction], {k, 3}]
Meilleures salutations
Florian Jaccard
EICN-HES
e-mail : jaccardf at eicn.ch
-----Message d'origine-----
De : André Giroux [mailto:giroux at dms.umontreal.ca]
Envoyé : sam., 31. août 2002 07:26
À : mathgroup at smc.vnet.net
Objet : [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