Date: Apr 20, 2013 5:54 AM
Author: Bob Hanlon
Subject: Re: Limiting Output Based on Z Axis of Plotd3d[Evaluate@Table[PDF[NormalDistribution

Since you refer to x, y, and z; presumably you mean a binormal rather than

a normal distribution.

max = 2.25;

zMax = 35;

Manipulate[

ContourPlot[

200*

PDF[BinormalDistribution[0], {x, y}],

{x, -max, max}, {y, -max, max},

Contours -> Range[step, zMax, step],

ContourShading -> None,

ContourStyle -> Thick],

{{step, 10, "Contour Step Size"}, {2.5, 5, 10}}]

Manipulate[

Plot3D[

200*

PDF[BinormalDistribution[0], {x, y}],

{x, -max, max}, {y, -max, max},

MeshFunctions -> {#3 &},

Mesh -> {Range[step, zMax, step]},

PlotStyle -> Opacity[opac]],

{{step, 10, "Contour Step Size"}, {2.5, 5, 10}},

{{opac, 0.5, "PDF Opacity"}, 0, 1, .1,

Appearance -> "Labeled"}]

Bob Hanlon

On Fri, Apr 19, 2013 at 1:18 AM, Garrett Fisher <fisher.garrett@gmail.com>wrote:

> Good Day,

>

> I am plotting some bell curves using the function in the subject line.

> The PDF of NormalDist produces static Z values - which is fine -

> except I wish to limit them. I would like to show XY data at Z 0, 10,

> 20, 30 and so forth - with an intended gap in the Plot for Z 1-9,

> 11-19, 21-29. I am beginning to think that getting into the actual

> data output of the Table might be necessary. I am fine with that - I

> am just a bit new at Mathematica - so I don't know where to start to

> figure that part out.

>

> Thanks for any help!!!

>

>