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