Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2001
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2001

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

Search the Archive

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