Re: Attach legend to a family of functions?

*To*: mathgroup at smc.vnet.net*Subject*: [mg129268] Re: Attach legend to a family of functions?*From*: "Nasser M. Abbasi" <nma at 12000.org>*Date*: Fri, 28 Dec 2012 05:34:03 -0500 (EST)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*Delivered-to*: l-mathgroup@wolfram.com*Delivered-to*: mathgroup-newout@smc.vnet.net*Delivered-to*: mathgroup-newsend@smc.vnet.net*References*: <kbh6cg$iht$1@smc.vnet.net>*Reply-to*: nma at 12000.org

On 12/27/2012 4:02 AM, dabd wrote: > How can I attach a legend to this plot? > > Plot[Evaluate[{(1+x-t-4x(1+x)t+Sqrt[(x+2x^2)^2 t])/((1+2x)^2 t-1)}/.t->Range[0,1,0.1]],{x,0,20}] > > I would like a legend for each t in the range. > > Thanks. > V9: Plot[Evaluate[{(1 + x - t - 4 x (1 + x) t + Sqrt[(x + 2 x^2)^2 t])/((1 + 2 x)^2 t - 1)} /. t -> Range[0, 1, 0.1]], {x, 0, 20}, PlotLegends -> "Expressions"] screen shot: http://12000.org/tmp/122712/plot.png