MathGroup Archive 2000

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

Search the Archive

Re: Color Charts

  • To: mathgroup at
  • Subject: [mg26430] Re: Color Charts
  • From: Schlier <schlier at>
  • Date: Wed, 20 Dec 2000 00:21:50 -0500 (EST)
  • Organization: uni freiburg
  • References: <914lvu$>
  • Sender: owner-wri-mathgroup at

Bernd Brandt wrote:

> Dear group,
> Does someone know how I can read to code which produces all the color charts
> in the Help browser?
> Under Getting Started/Demos - Graphics Gallery - Color Charts is a
> number of color charts (RGB, Hue, GrayLevel).
> I would like know the code that produced these.
> Regards,
> Bernd

Here is some example showing Hue in steps of 0.05 (0.05) 1.0, Saturation = 1,
and Brightness in steps of 0.1 (0.1) 1.0 similar to what you ask for. You can
play around with it. However, writing the axis numbers with text is not an
optimal solution, since you need some to adapt the string to the size of the

coltab = Table[Graphics[{Hue[j*0.05, 1., 0.70+k*0.03], Rectangle[{0,0}, {1,1}]
}],{k,1,10}, {j,1,20}];
numtab = Table[{" "<>ToString[0.1*n-0.1]<>"   "},{n,1,10}]//Flatten;

TextStyle->{FontFamily->"Arial", FontSize->12},

You should also consult Tom Wickham-Jones's book Mathematica Graphics, Chapter
Sincerely C.S.

  • Prev by Date: Question: nonlinear differential equation with boundary conditions
  • Next by Date: Re: Pattern match exactly 0 or 1 times?
  • Previous by thread: Color Charts
  • Next by thread: How can I display the total time ?