Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1995

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

Search the Archive

Re: ContourPlots

  • To: mathgroup at
  • Subject: [mg2042] Re: [mg2024] ContourPlots
  • From: Tom Wickham-Jones <twj>
  • Date: Sat, 16 Sep 1995 01:42:24 -0400

>I would like to know how to plot two ContourPlots (with Contours at 

>0) into one plot. The command Show[plot1,plot2], where plot1 and 


>are defined as ContourPlots does not work, Also, the command 

>PLot[{f1,f2},{x,.,.},{y,.,.}], where f1 and f2 define two implicit 

>functions in x and y  does not work either. Is there a way that works 


If you want to plot an implicit function then the command to use is ContourPlot.
If you want to combine two contours you can do this with Show[plot1,plot2].
When you do it you probably want to turn off contour shading so that one plot
does not hide the other.

In[8]:= ContourPlot[ x^2 +y^2-1, {x, -2,2},{y,-2,2},
        ContourShading -> False, Contours -> {0}]

Out[8]= -ContourGraphics-

In[9]:= ContourPlot[ x^2 y^2-1, {x, -2,2},{y,-2,2},
        ContourShading -> False, Contours -> {0}]

Out[9]= -ContourGraphics-

In[10]:= Show[%, %%]

Out[10]= -Graphics-

Tom Wickham-Jones

  • Prev by Date: Re: Mathematica and NetScape
  • Next by Date: Weirdness in Encapsulated Postscript (Windows version)?
  • Previous by thread: ContourPlots
  • Next by thread: Re: ContourPlots