Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2002
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2002

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

Search the Archive

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




  • 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