Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*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 2004

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

Search the Archive

RE: PlotLabel with assigned variables *and* on several lines

  • To: mathgroup at smc.vnet.net
  • Subject: [mg49029] RE: [mg49000] PlotLabel with assigned variables *and* on several lines
  • From: "David Park" <djmp at earthlink.net>
  • Date: Tue, 29 Jun 2004 04:50:04 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Alain,

How about...

a = 1; b = 2; Plot[ Sin[x], {x, 0, 1},
  PlotLabel -> SequenceForm["a = ", a, "\nb = ", b]];

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/

From: Alain Cochard [mailto:alain at geophysik.uni-muenchen.de]
To: mathgroup at smc.vnet.net
ines


Hello.

By searching the archives I found how to write variables with
specific values.  E.g., the following examples work:

    In[253]:= a=1;b=2; Plot[ Sin[x],{x,0,1},PlotLabel->"a=" <> ToString[a]
"b=" <> ToString[b] ]

    In[254]:= a=1;b=2; Plot[ Sin[x],{x,0,1},PlotLabel->SequenceForm
["a=",a,"b=",b]]


Then I also found how to write a label on several lines:

    In[256]:= Plot[ Sin[x],{x,0,1},PlotLabel->"2 \n lines"]


But I did not find or succeed in combining the two.  E.g., those do
not work:

    In[255]:= a=1;b=2; Plot[ Sin[x],{x,0,1},PlotLabel->"a=" <> ToString[a]
\n "b=" <> ToString[b] ]

    Syntax::sntxf: "a=1;b=2; Plot[ Sin[x],{x,0,1},PlotLabel->"a=" <>
ToString[a"
     cannot be followed by "]\n"b=" <> ToString[b] ]".

    In[264]:= a=1;b=2; Plot[
Sin[x],{x,0,1},PlotLabel->SequenceForm["a=",a,\n" b=",b]]

    Syntax::com: Warning: comma encountered with no adjacent expression; the
	 expression will be treated as Null.


    Syntax::sntxf: "a=1;b=2; Plot[ Sin[x],{x,0,1},PlotLabel->SequenceForm
["a=",a"
	 cannot be followed by ",\n"b=",b]]".


    In[264]:= a=1;b=2; Plot[ Sin[x],{x,0,1},PlotLabel->SequenceForm["a=",a]
\n SequenceForm["b=",b]]

    Syntax::sntxf: "a=1;b=2; Plot[
Sin[x],{x,0,1},PlotLabel->SequenceForm["a=",a]"
	 cannot be followed by " \n SequenceForm["b=",b]]".


Is there a way to achieve this goal?

Thanks in advance,
AC




  • Prev by Date: Re: Clarification [Overlay graphs ]
  • Next by Date: Re: Union - simple question
  • Previous by thread: Re: PlotLabel with assigned variables *and* on several lines
  • Next by thread: Re: PlotLabel with assigned variables *and* on several lines