Re: Plot Table of functions does not distinguish colors
- To: mathgroup at smc.vnet.net
- Subject: [mg102695] Re: [mg102676] Plot Table of functions does not distinguish colors
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Wed, 19 Aug 2009 07:02:33 -0400 (EDT)
- Reply-to: hanlonr at cox.net
Because Plot has attribute HoldAll.
Attributes[Plot]
{HoldAll,Protected}
Plot[Evaluate[Table[Sin[n x], {n, 1, 3, 1}]], {x, 0, 2 Pi},
PlotRange -> All, PlotStyle -> Thick]
Bob Hanlon
---- fd <fdimer at gmail.com> wrote:
=============
All, this seems like a simple question, but when I want to create a
table with different function as in the example
Plot[Table[Sin[n x], {n, 1, 3, 1}], {x, 0, 2 Pi}, PlotRange -> All,
PlotStyle -> Thick]
I get all three plots with the same color. If I instead write the
table manually
Plot[{Sin[x], Sin[2 x], Sin[3 x]}, {x, 0, 2 Pi},PlotStyle->Thick]
This gives a different plot with a different color for each plot.
Can anyone shed some light on why this behavior?
Best