Code:
y[y0_, xc_, w_, A_, x_] := y0 + A/(w Sqrt[Pi/2]) Exp[-2 (x - xc)^2/w^2]
Plot[y[0.01095, -4.9318 10 10^-6, 16350976.74667, 202069748.14,
x], {x, -10^9, 10^9}]
Samo to prekucaj u notebook i pokreni. Da ne mucimo coveka.
If you can't explain it simply, you don't understand it well enough. A. Einstein