       • To: mathgroup at smc.vnet.net
• Subject: [mg84078] Re: Adding description to plots
• From: Bill Rowe <readnewsciv at sbcglobal.net>
• Date: Sun, 9 Dec 2007 06:36:46 -0500 (EST)

```On 12/8/07 at 5:47 AM, frank.hechtner at rub.de (Frank Hechtner) wrote:

<snip>

>Now i have the followung problem: i dont know which curve refers to
>which parameter of "s". I only see 6 differently coloured curves.
>Does Mathematica 6.0 provide such a function to add labels to each
>curve in the plot?

There are a number of ways to add labeling to plots in version
6. Here are three:

Plot[Tooltip@{x, x^2, x^3}, {x, -1, 1}]

This displays the label when your mouse is positioned over a curve

<< PlotLegends`;
Plot[{x, x^2, x^3}, {x, -1, 1},
PlotLegend -> {"x", "\!\(\*SuperscriptBox[\"x\", \"2\"]\)",
"\!\(\*SuperscriptBox[\"x\", \"3\"]\)"}]

This gives you a shadow box with the plot labels

GraphicsRow[{Plot[{x, x^2, x^3}, {x, -1, 1}],
Plot[{1, 2, 3}, {x, 0, 1}, PlotRange -> {{-1, 10}, {-3, 4}},
Axes -> None,
Epilog ->
Text[#1, {1.2, #2}, {-1, 0}] &, {{"x",
"\!\(\*SuperscriptBox[\"x\", \"2\"]\)",
"\!\(\*SuperscriptBox[\"x\", \"3\"]\)"}, Range@3}]]}]

This creates labels to the side of the main plot
--
To reply via email subtract one hundred and four

```

• Prev by Date: Re: Get list of function variables?
• Next by Date: Re: Mathematica: Long divison for polynomials