plot[sqrt(1/(4*pi))*e^(-1/(4*t))/t^(3/2),{t,0,3}]