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
>