How can I plot this probability density function using Wolfram Mathematica Keeping the constants the same.
ψ*ψ= A^2 (x^2)exp(-2a(mx^2/h)) ; where m,a,A,and h are constants and I want the graph in terms of them.
I tried: Plot[A^2 *(x^2)*exp(-2a(mx^2/h)),{x,-1000,1000}]