Date: Dec 29, 2012 3:09 PM
Author: Bob Hanlon
Subject: Re: format legend?

Plot[
Evaluate[
Table[
Tooltip[
y = (b/(b + 1)) (n/(1 - n)),
{n // N, y}],
{n, 5/100, 4/10, 5/100}],
{b, 0, 2}],
PlotLegends -> Table[
"n=" <> ToString[NumberForm[k, {3, 2}]],
{k, 0.05, 0.40, 0.05}]]

However, the legend is "upside down" compared to the order of the
plots. Either of the following will realign the legends

Plot[
Evaluate[
Reverse[
Table[
Tooltip[
y = (b/(b + 1)) (n/(1 - n)),
{n // N, y}],
{n, 5/100, 4/10, 5/100}]],
{b, 0, 2}],
PlotLegends ->
Reverse[
Table[
"n=" <> ToString[NumberForm[k, {3, 2}]],
{k, 0.05, 0.40, 0.05}]]]

Plot[
Evaluate[
Table[
Tooltip[
y = (b/(b + 1)) (n/(1 - n)),
{n // N, y}],
{n, 4/10, 5/100, -5/100}],
{b, 0, 2}],
PlotLegends -> Table[
"n=" <> ToString[NumberForm[k, {3, 2}]],
{k, .4, 0.05, -0.05}]]


Bob Hanlon


On Fri, Dec 28, 2012 at 5:33 AM, dabd <dario.rehman@gmail.com> wrote:
> Plot[Evaluate[{(b/(b + 1)) (n/(1 - n))} /.
> n -> Range[0.05, 0.40, 0.05]], {b, 0, 2},
> PlotLegends ->
> Table[StringForm["n=``",
> ToString[k, InputForm, NumberMarks :> False]], {k, 0.05, 0.40,
> 0.05}]]
>
> How can I format the numbers in the legend with 2 decimal places?
>
> Thanks.
>