氣候變化及其診斷實習(xí)報告-全文預(yù)覽
【正文】 i,x(N) real avex,avey,y(N),sx,sy,a,b,sxy,sx2open(2,file=39。)open(4,file=39。,39。,), m !求檢驗值cy=0hy=0do i=1,Ny2(i)=a+b*x(i)cy=cy+(y(i)y2(i))**2hy=hy+(y2(i)avey)**2print(), y2(i)end doFF=hy/(cy/(N2))print(39。（3）所繪圖形如下：據(jù)圖并結(jié)合EOF統(tǒng)計原理知，在赤道太平洋中東部區(qū)域第一特征向量值為正，西海岸值為負(fù)，表明赤道太平洋中東部海溫變化同向，且與西海岸變化相反；再結(jié)合時間系數(shù)圖，大體看來從19451958年、19741976年，赤道西太平洋海溫升高，中東太平洋海溫降低；從19581972赤道太平洋海溫升溫和降溫的年份基本相等；19781990年，赤道西太平洋海溫降低，中東太平洋海溫升高。,),FFwrite(4,200)(y2(i),i=1,N)200 format()end subroutine（3）程序運行結(jié)果：回歸方程為： Y= F=實習(xí)五（1）實習(xí)目的：根據(jù)數(shù)據(jù)，對海溫場做EOF分析，畫出第一特征向量及其時間系數(shù)，并分析其時空特征。), a,bprint(39。)sx=0sy=0do i =1,Nread(2,*) x(i)read(3,*) y(i)sx=sx+x(i)sy=sy+y(i)end do avex=sx/Navey=sy/Ncall f(x,y,avex,avey)end program!求回歸方程subroutine f(x,y,avex,avey)implicit none parameter N=17,P=integer i,x(N)real avex,avey,y(N),sxy,sx2,b,a,m,y2(N),cy,hy,FFsxy=0sx2=0do i=1,Nsxy=sxy+(x(i)avex)*(y(i)avey)sx2=sx2+(x(i)avex)**2end dosxy=sxy/Nsx2=sx2/Nb=sxy/sx2a=aveyb*avexm=a+b*Pprint(39。)open(3,file=39。但是南京站降水量明顯比上海站降水量大。實習(xí)二（1）實習(xí)目的：根據(jù)表中所給7月平均降水資料，選擇與自己所在地和鄰近點上海站，計算兩者的相關(guān)系數(shù)。7月份標(biāo)準(zhǔn)差場上圖是500hpa高度場1982年7月要素標(biāo)準(zhǔn)差場分布圖，從圖中可以分析出：該要素緯向分布無明顯連續(xù)的變化趨勢，呈現(xiàn)多個中心，在62E，17N，132E，7N和103E
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1