MathGroup Archive 2011

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

Search the Archive

Re: Generating a Sequence of Plot Style Directives

  • To: mathgroup at
  • Subject: [mg120692] Re: Generating a Sequence of Plot Style Directives
  • From: David Annetts <david.annetts at>
  • Date: Wed, 3 Aug 2011 19:21:11 -0400 (EDT)
  • Delivered-to:
  • References: <>

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.


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

  • Prev by Date: Re: special iterator
  • Next by Date: Re: RegionGrowing function
  • Previous by thread: Generating a Sequence of Plot Style Directives
  • Next by thread: Re: Poincare section for double pendulum