Re: uniquely change curve colors and make them darker
- To: mathgroup at smc.vnet.net
- Subject: [mg49778] Re: uniquely change curve colors and make them darker
- From: BobHanlon at aol.com
- Date: Sat, 31 Jul 2004 03:13:58 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
The parameter for Hue must be between 0 and 1 or it will cycle. For four
plots, {k, 4},
(k + 2)/6
runs from 1/2 to 1. If you have n plots (n>1) and want the colors to run
from Hue[1/2] to Hue[1] then use
PlotStyle -> Table[Hue[(k+n-2)/(2(n-1)), {k, n}]
or more generally to run the colors from Hue[m] to Hue[u] where 0<m<u<=1
PlotStyle -> Table[(k-1)(u-m)/(n-1)+m, {k, n}]
Bob Hanlon
> <BR>In a message dated Fri, 30 Jul 2004 10:38:36 +0000 (UTC),
> sean_incali at yahoo.com writes:<BR><BR>http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&;
> threadm=bvfvtb%24qeu%241%40smc.vnet.net&rnum=1&
> prev=/groups%3Fhl%3Den%26lr%3D%26ie%3DUTF-8%26selm%3Dbvfvtb%2524qeu%25241%2540smc.vnet.net
>
> has a one liner for labeling and changing the curve colors
> automatically.
> namely
>
> PlotLegend -> (#[[1]] & /@ sol)
>
> PlotStyle -> Table[Hue[(k + 2)/6], {k, 4}]
>
> but with say... 10 variable system, the code seems to repeat the
> colors even if i use,
>
> PlotStyle -> Table[Hue[(k + 2)/4], {k, 10}]
>
>
> so...
>
> how do i ensure all 10 variables are of different and unique colors?
>
> and how do i add grey levels to the unique colors so that yellow,
> cyan, green show up darker?
>
> I'm not sure if i'm making myself clear...
>