A=1.6;mu=0;sigma=1;
gaussian[x_]:=A Exp[-(x-mu)^2/(2 sigma^2)];
Plot[gaussian[x],{x,-10,15},PlotRange->All]