MathGroup Archive 2002

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

Search the Archive

Re: PlotLabel


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




  • Prev by Date: Re: How to ...?
  • Next by Date: Re: L2 inner product. Integrate and Conjugate?
  • Previous by thread: RE: PlotLabel
  • Next by thread: Re: Null