Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

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!




  • Prev by Date: problem with replace all and functions
  • Next by Date: Re: Re: Trouble with FullSimplify
  • Previous by thread: Re: Plotting a x,y,z function
  • Next by thread: Re: Plotting a x,y,z function