Re: ListContourPlot Color

• To: mathgroup at smc.vnet.net
• Subject: [mg31518] Re: [mg31474] ListContourPlot Color
• From: BobHanlon at aol.com
• Date: Thu, 8 Nov 2001 04:56:23 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```ListContourPlot[
Table[x^2+y^2+Random[Real,{-0.2,0.2}],
{x,-2,2,0.1},{y,-2,2,0.1}],
ColorFunction -> Hue];

Needs["Graphics`Colors`"];

cf[x_] := Which[
x >.5, Red,
x > .3, Orange,
x > .1, Yellow,
x > 0.05, Green,
True, Blue
];

ListContourPlot[
Table[x^2+y^2+Random[Real,{-0.2,0.2}],
{x,-2,2,0.1},{y,-2,2,0.1}],
ColorFunction -> cf];

In a message dated 2001/11/7 6:43:12 AM,  writes:

>
>In a message dated 2001/11/7 5:46:57 AM, Moranresearch at aol.com writes:
>
>>Is the a way to assign specific colors to the intervals between individual
>>
>>contours?
>>
>
>ListContourPlot[
>    Table[x^2+y^2+Random[Real,{-0.2,0.2}],
>      {x,-2,2,0.1},{y,-2,2,0.1}],
>    ContourStyle->RGBColor[0,0,1]];
>
>ListContourPlot[
>    Table[x^2+y^2+Random[Real,{-0.2,0.2}],
>      {x,-2,2,0.1},{y,-2,2,0.1}],
>    ContourStyle->{{RGBColor[0,0,1]},{RGBColor[1,0,0]}}];
>
>ListContourPlot[
>    Table[x^2+y^2+Random[Real,{-0.2,0.2}],{x,-2,2,0.1},{y,-2,2,0.1}],
>    ContourStyle->Join[
>        Table[{RGBColor[0,0,1]},{2}],
>        {RGBColor[1,0,0]}]];
>
>
>Bob Hanlon
>Chantilly, VA  USA
>

```

• Prev by Date: Re: Ticks & MultipleListPlot
• Next by Date: Re: Limt question
• Previous by thread: Re: ListContourPlot Color
• Next by thread: RE: ListContourPlot Color