##LOAD MBH "SPARSE" #centered on 1902-1980 #originally from ftp://ftp.ncdc.noaa.gov/pub/data/paleo/paleocean/by_contributor/mann1998/nhem-sparse.dat if (method=="online") { download.file("http://www.climateaudit.org/data/mbh98/sparse.tab","temp.dat",mode="wb") load("temp.dat")} else load("d:/climate/data/mann/sparse.tab") sparse=sparse[,1] sparse=sparse-mean(sparse[(1902:1980)-1853])