Re: Plotting a x,y,z function
- To: mathgroup at smc.vnet.net
- Subject: [mg98673] Re: [mg98646] Plotting a x,y,z function
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Thu, 16 Apr 2009 04:12:39 -0400 (EDT)
- Reply-to: hanlonr at cox.net
The radius is
Norm[{x, y, z}]
Sqrt[Abs[x]^2 + Abs[y]^2 + Abs[z]^2]
Since you are dealing only with real values
Simplify[%, Element[{x, y, z}, Reals]]
Sqrt[x^2 + y^2 + z^2]
f[x_, y_, z_] = Module[{r2 = x^2 + y^2 + z^2},
r2* E^-(r2/2)]
E^((1/2)*(-x^2 - y^2 - z^2))*(x^2 + y^2 + z^2)
ContourPlot3D[f[x, y, z], {x, -10, 10}, {y, -10, 10}, {z, -10, 10}]
Bob Hanlon
---- chem_chick <raeanne.napoleon at gmail.com> wrote:
=============
I needed help plotting the following function:
f[x_,y_,z_] = (x^2+y^2+z^2) e^-(r^2/2)
ContourPlot3D[(x^2 + y^2 - z^2) Exp[-r^2/2], {x, -10, 10}, {y, -10,
10}, {z, -10, 10}]
does not work because it doesn't understand what r (radius) is....what
is the keyword/whatever for radius? Or do I have to define r in terms
of x,y,z somehow?! Help with syntax will be great!
Thanks!