I have a 3 dimensional orbital-specfic electron density function ( |\psi(r)|2 ) for all relevant r values. How would I go about finding the corresponding \psi(r)? I know it would be something related to a Fourier transform, I'm just unsure about how to go about performing it in mathematica or...