Re: PlotLabel with assigned variables *and* on several lines
- To: mathgroup at smc.vnet.net
- Subject: [mg49049] Re: PlotLabel with assigned variables *and* on several lines
- From: Bill Rowe <readnewsciv at earthlink.net>
- Date: Tue, 29 Jun 2004 04:50:36 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
On 6/28/04 at 4:13 AM, alain at geophysik.uni-muenchen.de (Alain
Cochard) wrote:
>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] ]
Here, since the \n is not in quotes, Mathematica does not see it as a string. Rewrite this as:
Plot[ Sin[x],{x,0,1},PlotLabel->"a="<>ToString[a] "\nb="<>ToString[b] ]
and you will get the result you want. But if it was me, I would be explicit in my desire for PlotLabel to see the argument as a single string and write it as
Plot[ Sin[x],{x,0,1},PlotLabel->"a="<>ToString[a]<>"\nb="<>ToString[b] ]
>In[264]:= a=1;b=2; Plot[
>Sin[x],{x,0,1},PlotLabel->SequenceForm["a=",a,\n" b=",b]]
There is the same problem here. The \n needs to be in quotes, i.e.,
Plot[Sin[x],{x,0,1},PlotLabel->SequenceForm["a=",a,"\n",b=",b]]
will do what you want.
--
To reply via email subtract one hundred and four