Plot[0.1*Exp[-x^2/10],{x,-10,10}]