Re: Adding description to plots
- To: mathgroup at smc.vnet.net
- Subject: [mg84077] Re: Adding description to plots
- From: Norbert Marxer <marxer at mec.li>
- Date: Sun, 9 Dec 2007 06:36:14 -0500 (EST)
- References: <fjdsur$j4d$1@smc.vnet.net>
On 8 Dez., 11:51, Frank Hechtner <frank.hecht... at rub.de> wrote:
> hi,
>
> i?m in trouble with a plot. The following functions generates a plot
> with several curves
>
> Plot[Evaluate[Table[Steuerkeil[0.1, s, t], {s, 0.2, 0.5, 0.05}]], {t,
> 0, 30}, AxesLabel -> {"Laufzeit T", "Steuerkeil"}, PlotLabel -> s,
> BaseStyle -> {FontFamily -> "Garamond", FontSize -> 12}]
>
> 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?
>
> Thanks for your help
>
> Frank
Hello
What about Tooltip's?
Steuerkeil[0.1, s_, t_] := s*t;
Plot[Evaluate[(Tooltip[#1[[1]], #1[[2]]] & ) /@ Table[{Steuerkeil[0.1,
s, t], s}, {s, 0.2, 0.5, 0.05}]],
{t, 0, 30}, AxesLabel -> {"Laufzeit T", "Steuerkeil"}, PlotLabel
-> s,
BaseStyle -> {FontFamily -> "Garamond", FontSize -> 12}]
Best Regards
Norbert Marxer