Plot[{657*E^(-E^(.4(2012 - x))), 483*(1 + E^(0.92(2012 - x)))^(-1)}, {x, 2007, 2020}]