plot(0.5x-0.25x*tanh(x/2000000),{x,0,5*10^6})