Re: PlotLabel with assigned variables *and* on several lines
- To: mathgroup at smc.vnet.net
- Subject: [mg49018] Re: PlotLabel with assigned variables *and* on several lines
- From: BobHanlon at aol.com
- Date: Tue, 29 Jun 2004 04:49:44 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
The newline (\n) needs to be in the string.
a=1;b=2; Plot[ Sin[x],{x,0,1},
PlotLabel->"a=" <> ToString[a] <> "\nb=" <> ToString[b] ];
Plot[ Sin[x],{x,0,1},PlotLabel->SequenceForm["a=",a,"\nb=",b]];
Bob Hanlon
> <BR>In a message dated Mon, 28 Jun 2004 08:24:07 +0000 (UTC), <
> alain at geophysik.uni-muenchen.de> writes:<BR><BR>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?
>