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.
--
Helen Read
University of Vermont