MathGroup Archive 2004

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

Search the Archive

Re: 3D plotting problem

  • To: mathgroup at
  • Subject: [mg51772] Re: 3D plotting problem
  • From: mathma18 at (Narasimham G.L.)
  • Date: Mon, 1 Nov 2004 02:53:22 -0500 (EST)
  • References: <cm22fs$ggj$>
  • Sender: owner-wri-mathgroup at

Bill Rowe <readnewsciv at> wrote in message news:<cm22fs$ggj$1 at>...
> On 10/30/04 at 3:47 AM, Henning.Heiberg-Andersen at (Henning
> Heiberg-Andersen) wrote:
> >I find myself unable to make a 3D plot of the atomic 2p orbital
> >f_z(2p,x,y,z;a)=z*Exp[-a*Sqrt[x^2+y^2+z^2]].

Taking f_z=1, x^2+y^2 = r^2 for rotational symmetry, it seems possible
in a limited z interval due to sqrt and log.

a = 1 ; r = Sqrt[ (Log[z]/a)^2 - z^2];
ParametricPlot3D [{r Cos[th], r Sin[th], z}, {z, -1, 1}, {th, 0, 2
Pi}, PlotPoints -> {23, 21}]

  • Prev by Date: closing notebook cells
  • Next by Date: Re: bimodal ditribution form counting signs of Pi digits differences
  • Previous by thread: Re: Re: closing notebook cells
  • Next by thread: Re: 3D plotting problem