气象统计方法实习报告材料

气象统计方法实习报告材料

ID:40003881

大小:1.03 MB

页数:36页

时间:2019-07-17

气象统计方法实习报告材料_第1页
气象统计方法实习报告材料_第2页
气象统计方法实习报告材料_第3页
气象统计方法实习报告材料_第4页
气象统计方法实习报告材料_第5页
资源描述:

《气象统计方法实习报告材料》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、实用文档目录实习一求500hPa高度场气候场、距平场和均方差场31、资料介绍32.要求33、实习结果31)、FORTRAN源程序3(2)、grads文件5(3)、实习结果6实习二计算给定数据资料的简单相关系数和自相关系数111、资料介绍112、要求113、实习结果12(1)、Fortran源程序12(2)、程序运行结果:14实习三分析中国夏季降水线性趋势的分布特征151.资料介绍及要求:152.实习结果15(1).matlab程序15(2).程序运行结果16实习四求给定数据的一元线性回归方程171、资料介绍及要求172、实习结果18文案大全实用文档(1)、MATLAB程序

2、18(2)、程序运行结果18(3)、结果分析19实习五对给定的海温数据进行EOF分析211、资料介绍212、要求213、实习结果:21(1)、FORTRAN源程序21(2)空间场和时间序列的ctl文件23(3)运行结果24(4)分析26实习三(附加)计算给定数据的11年滑动平均和累积距平281、资料介绍282、要求283、实习结果28实习四(附加)求给定数据的多元线性回归方程311、说明312、要求313、实习结果:31(1)Matlab源程序31(2)运行结果35文案大全实用文档实习一求500hPa高度场气候场、距平场和均方差场1、资料介绍有一500hPa高度场资料,文

3、件名h500.dat,范围:60~150E,0~40N.时段:1982.1~1985.12共48个月。水平分辨率:2.5*2.5,格点数:37*17。2.要求编fortran程序,求500hPa高度场的(1)气候场;(2)距平场;(3)均方差场。并能用Grads做出图形,实习报告中气候场、距平场、均方差场任意给出两张图,图注要清楚,即要注明是哪个时间的图形,并做简单分析。注:h500.For给出了如何用fortran读取ASCII码资料h500.dat.文案大全实用文档3、实习结果1)、FORTRAN源程序programex_gradsimplicitnoneintege

4、r,parameter::nx=37,ny=17,nz=4,nt=12integeri,j,iz,itrealvar(nx,ny,nz,nt),cl(nx,ny,nt),sum,jp(nx,ny,nz,nt),jfc(nx,ny,nt)!Openingfileopen(10,file='g:gradsdatah500.dat')doiz=1,nzdoit=1,ntread(10,1000)read(10,3000)((var(i,j,iz,it),i=1,nx),j=1,ny)enddoenddo1000format(2i7)2000format(37f6.2)300

5、0format(37f8.1)4000format(37f7.2)close(10)!Outputopen(16,file='g:gradsdatah500.grd',form='binary')doiz=1,nzdoit=1,ntwrite(16)((var(i,j,iz,it),i=1,nx),j=1,ny)enddoenddo!CalculatingtheClimatologicalFielddoit=1,ntdoi=1,nxdoj=1,nysum=0doiz=1,nzsum=sum+var(i,j,iz,it)enddocl(i,j,it)=sum/4endd

6、oenddoenddo文案大全实用文档!Outputclimate-fileopen(12,file='g:gradsdataclimate.grd',form='binary')doit=1,ntwrite(12)((cl(i,j,it),i=1,nx),j=1,ny)enddo!CalculatingtheAnomalydoiz=1,nzdoit=1,ntdoi=1,nxdoj=1,nyjp(i,j,iz,it)=var(i,j,iz,it)-cl(i,j,it)enddoenddoenddoenddoopen(13,file='g:gradsdataanom

7、aly.grd',form='binary')!Outputanomaly-filedoiz=1,nzdoit=1,ntwrite(13)((jp(i,j,iz,it),i=1,nx),j=1,ny)enddoenddo!CalculatingtheMean-squareDeviationdoit=1,ntdoi=1,nxdoj=1,nysum=0doiz=1,nzsum=sum+(jp(i,j,iz,it))**2enddojfc(i,j,it)=sqrt(sum/4)enddoenddoenddo!Outputmean-s

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。