气象统计实习..doc

《气象统计方法课程实习》 学生姓名 x x 学 号 xxxxxxxxxxxx 院 系 大气科学 专 业 大气科学 任课教师 x x 二Ｏ一四年十二月二十日 实习一 求500hPa高度场气候场、距平场和均方差场 （1）气候场 二月份高度场的气候场呈现南高北低的状态，陆地上的高度场比较稀疏，而在西太平洋上高度场比较密集。 7月份高度场的气候场总体呈现东高西低的状态，在印度半岛出现低压中心，而在赤道西太平洋地区出现高压中心，位置在130°E，25°N附近。35°N以北高度分布很密集，而35°N以南比较稀疏。 （2）距平场 1982年5月距平场在我国华东地区出现负距平,在亚洲西南部也出现低压中心，在青藏高原处为正距平。 1984年4月距平场在日本东部海洋地区形成低压中心，印度半岛的西部有一低压中心，在35°N-40°N基本都为正距平。 （3）均方差场 三月份高度的均方差场整体呈现南小北大的状态。说明低纬地区高度的波动幅度比较小，而中高纬地区高度的波动比较大。在太平洋北部波动最大。 十月份高度的均方差场在西太平洋有极大值，其余地区波动都较小。 实习二 计算给定数据资料的简单相关系数和自相关系数 单相关系数和自相关系数程序： program main parameter(n=20,m=10) integer i,j,t,max1,max2 real r,s1,s2 real a(n),b(n),ano1(n),ano2(n),bzh1(n),bzh2(n),r1(m),r2(m) real ave1,ave2,sum12,sum11,sum22 data a/3.40,3.30,3.20,2.90,3.40,2.80,3.60,3.00,2.80,3.00,3.10,3.00,2.90,2.70,3.50,3.20,3.10,2.80,2.90,2.90/ data b/3.24,3.14,3.26,2.38,3.32,2.71,2.84,3.94,2.75,1.83,2.80,2.81,2.63,3.20,3.60,3.40,3.07,1.87,2.63,2.47/ !求平均 ave1=0.0 ave2=0.0 do i=1,n ave1=ave1+a(i) ave2=ave2+b(i) enddo ave1=ave1/n ave2=ave2/n !求距平 ano1(n)=0.0 ano2(n)=0.0 do i=1,n ano1(i)=a(i)-ave1 ano2(i)=b(i)-ave2 Enddo !求标准差 s1=0.0 s2=0.0 do i=1,n s1=s1+ano1(i)*ano1(i) s2=s2+ano2(i)*ano2(i) enddo s1=sqrt(s1/n) s2=sqrt(s2/n) !标准化 bzh1(n)=0.0 bzh2(n)=0.0 do i=1,n bzh1(i)=ano1(i)/s1 bzh2(i)=ano2(i)/s2 enddo !求相关系数 sum12=0.0 sum11=0.0 sum22=0.0 do i=1,n sum12=sum12+ano1(i)*ano2(i) sum11=sum11+ano1(i)*ano1(i) sum22=sum22+ano2(i)*ano2(i) enddo r=sum12/sqrt(sum11*sum22) print* print*,中国1970-1989年年平均和冬季平均气温的相关系数为r=,r print* !求自相关系数 r1(m)=0.0 r2(m)=0.0 do t=1,m do j=1,n-t r1(t)=bzh1(j)*bzh1(j+t)+r1(t) r2(t)=bzh2(j)*bzh2(j+t)+r2(t) enddo r1(t)=r1(t)/(n-t) r