time=Table[i,{i,1983,2009}];
temp={-40,-38.1,-38.0,-37.0,-36.4,-35.7,-35.2,-34.3,-33.9,-33.0,-32.2,-31.0,-29.7,-30.5,-30.1,-28.6,-28.0,-27.8,-27.0,-26.1,-25.6,-24.9,-24.0,-23.6,-22.9,-22.0,-21.5};
co2={0.5,1.0,1.9,2.0,3.0,3.9,4.2,5.0,5.2,6.0,7.1,7.9,8.9,9.1,10.1,11.3,11.1,12.0,12.9,13.1,14.1,15.2,15.3,16.5,16.9,18.0,18.9};