|
Z.B.
<<Graphics`MultipleListPlot`;
Graphics`MultipleListPlot`MultipleListPlot[Table[
{x,Sin[2Pi
x]},{x,0,1,.2}],
PlotRange->All,
Graphics`MultipleListPlot`SymbolLabel->{
DisplayForm[StyleBox[#,FontSize->16]]&/@{"a","b","c","d","e","f"}},
PlotLabel->DisplayForm[StyleBox["label",FontSize->18]]]
----------------------------------------
Rolf Mertig
Mathematica Consultant
Mertig Research & Consulting
http://www.mertig.com
email: rolf@XXXXXXX.com
|