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