I am working with Mathematica to plot the densities of the Hydrogen Atom wave function. One can easily plot the orbital with SphereicalPlot3D, but I want the radial contribution as well. My equations are properly normalized and I have been using the appropriate contours. Could someone check notebook to see what I have missed? Itís really basic, but I want to get it working, before I fix it up. I might try to generalize to use other possible radial dependent potentials.
Attachment: Orbitals.nb, URL: ,