Re: Plot3D and ContourPlot problem

*To*: mathgroup at smc.vnet.net*Subject*: [mg73093] Re: Plot3D and ContourPlot problem*From*: dh <dh at metrohm.ch>*Date*: Thu, 1 Feb 2007 04:44:12 -0500 (EST)*References*: <epnae6$d8e$1@smc.vnet.net>

Hi Josef, try e.g.: f[x_, y_] := Exp[-(x^2 + y^2)] ShadowPlot3D[f[x, y], {x, -2, 2}, {y, -2, 2}, HiddenSurface ->False, Boxed -> True, PlotPoints -> 15, Lighting -> False, ViewPoint ->{-2.801, -1.785, 0.647}] Note that the options Lighting -> False is needed, contrary to the manual. Daniel Josef Otta wrote: > Hi, > i want to combine Plot3D and ContourPlot. Do You have any idea how to do > that? > 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]"? > > Thanks, > Josef >