Re: Multiple Styles

• To: mathgroup at smc.vnet.net
• Subject: [mg120638] Re: Multiple Styles
• From: Helen Read <readhpr at gmail.com>
• Date: Sun, 31 Jul 2011 23:36:47 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <j13e5s\$53p\$1@smc.vnet.net>

```On 7/31/2011 7:26 AM, ace55555 wrote:
> I am trying to change both the thickness and color of four parametric curves using PlotStyle. However, I either get the thickness or the colors to work but not both. I tried two different lines of code at the end of ParametricPlot3D:
> ..,PlotStyle ->  {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]}},PlotStyle ->  {Thickness[0.01]}
> ..,PlotStyle ->  {{RGBColor[1,0,0]},{RGBColor[0,1,0]},{RGBColor[0,0,1]},{RGBColor[0,0,0]},{Thickness[0.01]}}
> It would be deeply appreciated if someone could help me on this matter. Thanks.
>

You can use Directive to specify multiple styles for each curve. For
example:

curves = Table[{r Cos[t], r Sin[t]}, {r, 1, 4}];

ParametricPlot[curves, {t, 0, 2 \[Pi]},
PlotStyle -> {Directive[Red, Thick], Directive[Blue, Dashed],
Directive[Green, Thick, Dashing[Large]],
Directive[Purple, Dotted]}]

With some of the plotting functions it will also work to give a list of
lists of Styles, like this:

ParametricPlot[curves, {t, 0, 2 \[Pi]},
PlotStyle -> {{Red, Thick}, {Blue, Thick}, {Green, Thick}, {Purple,
Thick,Dashed}}]

But sometimes Directive is required.

--