- 积分
- 390
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2011-7-3
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2014-10-27 20:07:13
|
显示全部楼层
多谢river朋友,我是想算趋势,然后用线性回归方法来检验其显著性,显著的区域打点,gs文件如下,欢迎大家指点:
'run rgbset2'
'reinit'
'set grid on'
'set grads off'
'open year.ctl'
'sdfopen NA1901.2011.tmp.djf.nc'
'set grid on'
'set grads off'
'set poli on'
'set poli on'
'set mpdraw on'
'set vpage 0 11 0 8.5'
'set parea 1 10 1 8'
'set mpdset hires'
'set frame circle'
'set mproj nps'
'set lon -140 -60'
'set lat 15 75'
'set xlint 10'
'set ylint 10'
'set ylopts 1 4 0.20'
'set xlopts 1 4 0.20'
'set gxout shaded'
'set csmooth on'
'set rbcols 49 48 47 46 45 44 43 42 22 23 24 25 26 27 28 29'
'set clevs -0.5 -0.4 -0.3 -0.2 -0.1 0 0.1 0.2 0.3 0.4 0.5'
'set t 1 110'
'ltrend djft.2 air slope rmse'
'set t 1'
'd slope*10'
'run cbarn'
'run gmt.gs 0.1 10 10'
'set x 1'
'set y 1'
'set z 1'
'set t 1 110'
'define year= aave(var.1,global)'
'set lon -140 -60'
'set lat 15 75'
'set z 1'
'set t 1'
'define rr=tcorr(year,djft.2, t=1, t=110)'
*'d rr'
********************************test the significance of correlation correlation coefficient (rr)
* degree of freedom=110-2=108 (from 1902 to 2011), 95% significance (both sides)=0.195
* degree of freedom=110-2=108 (from 1902 to 2011), 90% significance (both sides)=0.164
'define tt=rr*sqrt(108/(1-pow(rr,2)))'
'define ts=abs(tt)-0.195'
'set gxout shp'
'set shp -pt shppt'
'd skip(maskout(tt,ts),2,2)'
'set shpopts -1 2 0.001'
'draw shp shppt'
'drawbox -95 -75 30 40'
'drawbox -130 -100 45 65' |
|