Re: Generating a Sequence of Plot Style Directives
- To: mathgroup at smc.vnet.net
 - Subject: [mg120692] Re: Generating a Sequence of Plot Style Directives
 - From: David Annetts <david.annetts at iinet.net.au>
 - Date: Wed, 3 Aug 2011 19:21:11 -0400 (EDT)
 - Delivered-to: l-mathgroup@mail-archive0.wolfram.com
 - References: <201108031105.HAA10793@smc.vnet.net>
 
Hi Gregory,
Something like
pstyl = Flatten@Join[{Directive[Thick, Blue]& /@ Range[numblue]},
{Directive[Dashed, Gray]& /@ Range[numgray]}];
preceded by
{numblue, numgray} = Switch[numseries,
16, {9, 7},
14, {8, 6}
];
could be generated on the fly.
D.
On 3/08/2011 19:05, Gregory Lypny wrote:
> Hello everyone,
>
> I've created a Manipulate that generates a series of plots depending
> on parameters that the user selects.  That selection will determine the
> number of series to plot and I would like to format them
> programmatically; for example, if there are 16, then the first nine
> might be thick and blue and the remaining seven dashed and grey.  How
> would I do that knowing the total number of series and the number in
> each style category?
>
> Regards,
>
> Gregory
>
- References:
- Generating a Sequence of Plot Style Directives
- From: Gregory Lypny <gregory.lypny@videotron.ca>
 
 
 - Generating a Sequence of Plot Style Directives