Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Re: PlotStyle will not distribute over Table

• To: mathgroup at smc.vnet.net
• Subject: [mg96654] Re: [mg96639] PlotStyle will not distribute over Table
• From: <ingolf.dahl at telia.com>
• Date: Thu, 19 Feb 2009 03:33:56 -0500 (EST)
• Organization: University of Gothenburg
• References: <200902180922.EAA20066@smc.vnet.net>
• Reply-to: <ingolf.dahl at physics.gu.se>

Try

Plot[Evaluate[Table[Sin[a x], {a, 1, 2}]], {x, 0, Pi}, 
 PlotStyle -> {Hue[0.7], Hue[1]}]

Best regards

Ingolf Dahl
Sweden

-----Original Message-----
From: Kresimir Kumericki [mailto:kkumer at calculon.phy.hr] 
Sent: den 18 februari 2009 10:23
To: mathgroup at smc.vnet.net
Subject: [mg96654] [mg96639] PlotStyle will not distribute over Table

I create several functions using Table and want to plot them
on the same plot with different styles. However, it seems that
the last style in the list of PlotStyle options is used for all 
the lines.  E.g.

    Plot[Table[Sin[a x], {a, 1, 2}], {x, 0, Pi}, 
     PlotStyle -> {Hue[0.7], Hue[1]}]

will have both lines with red color, while

    Plot[{Sin[ x], Sin[2 x]} , {x, 0, Pi}, 
     PlotStyle -> {Hue[0.7], Hue[1]}]

works correctly. Any idea how to make first version work?
(I have Mathematica 6.0)

Kresimir

• References:
  • PlotStyle will not distribute over Table
    • From: Kresimir Kumericki <kkumer@calculon.phy.hr>