MathGroup Archive 2007

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

Search the Archive

RE: Plot3D and ContourPlot problem

  • To: mathgroup at
  • Subject: [mg73087] RE: [mg73038] Plot3D and ContourPlot problem
  • From: "Jose Luis Gomez" <jose.luis.gomez at>
  • Date: Thu, 1 Feb 2007 04:19:57 -0500 (EST)
  • Organization: ITESM
  • References: <>

Dear Josef

I like to use ShadowPlot3D for this kind of plots. 
Notice that:
a) You MUST load the Graphics`Graphics3D` library BEFORE using ShadowPlot3D
b) In my version of MATHEMATICA (5.2 for Windows) you MUST set Lighting ->
False, something that is Not documented in the help browser.

Here is your example:

f[x_, y_] := Exp[-(x^2 + y^2)];
ShadowPlot3D[f[x, y], {x, -2, 2}, {y, -2, 2}, 
            Lighting -> False, ShadowPosition -> 1, 
            ShadowMesh -> False, PlotPoints -> 50]

I hope that helps!

Jose Gomez-Munoz, from Mexico

-----Mensaje original-----
De: Josef Otta [mailto:josef.otta at] 
Enviado el: Martes, 30 de Enero de 2007 06:12 a.m.
Para: mathgroup at
Asunto: [mg73038] Plot3D and ContourPlot problem

i want to combine Plot3D and ContourPlot. Do You have any idea how to do
I need to have for example picture with plotted function f[x,y] and on the
x-y plane shown its contours

f[x_, y_] := Exp[-(x^2 + y^2)]

a = Plot3D[f[x, y], {x, -2, 2}, {y, -2, 2}, HiddenSurface ->
    False, Shading -> False, Boxed -> True, PlotPoints -> 15]
b = ContourPlot[f[x, y], {x, -2, 2}, {y, -2, 2}, PlotPoints -> 30]

Any ideas how to do something like "Show[a,b]"?


  • Prev by Date: Re: Plot3D and ContourPlot problem
  • Next by Date: file functions & FrontEnd`FileName
  • Previous by thread: Re: Plot3D and ContourPlot problem
  • Next by thread: Re: Plot3D and ContourPlot problem