MathGroup Archive 1996

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

Search the Archive

Re: ContourPlot

  • Subject: [mg3406] Re: [mg3387] ContourPlot
  • From: mathes at esaab.math.missouri.edu (Elias Saab)
  • Date: 4 Mar 1996 10:12:59 -0600
  • Approved: usenet@wri.com
  • Distribution: local
  • Newsgroups: wri.mathgroup
  • Organization: Wolfram Research, Inc.
  • Sender: daemon at wri.com


I found an answer to my question below. The following code will do 
it.

Clear[colorfun]
colorfun[z_]:= If[z ==0,RGBColor[1,0,0],
                 RGBColor[1,1,1]];
              
ContourPlot[x^2+y^2 -1,{x,-2,2},{y,-2,2},
ColorFunction->colorfun,
Contours->{0}];


On Sun, 3 Mar 1996, Elias Saab wrote:

> 
> My question is the following:
> The code below
> 
> ContourPlot[x^2 + y^2 -1,{x,-1,1},{y,-1,1},
> Contours->{0}]
> 
> will produce a filled black circle.
> 
> What options one has to add to produce a filled Red Circle for example?
> 
> The following code
> 
> ContourPlot[x^2 + y^2 -1,{x,-1,1},{y,-1,1},
> Contours->{0},ColorFunction->Hue]
> 
> will make the inside and the outside of the circle Red.
> 
> 
> Any help is appreciated.
> Thanks
> Elias Saab
> 
> 
> 


  • Prev by Date: Re: ContourPlot
  • Next by Date: Re: Mathematica on MacOS 7.52
  • Previous by thread: Re: ContourPlot
  • Next by thread: Linear Solve