- 积分
- 3314
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-7-29
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
res = True
res@NoHeaderFooter = True ; Switch headers and footers off
pltres = True
pltres@PanelPlot = True ; Indicate these plots are to be paneled.
pltres@CommonTitle = True
mpres = True
mpres@tmYROn = False
mpres@tmXTOn = False
mpres@tmXBLabelAngleF = 90.
mpres@tmXBLabelJust = "CenterLeft"
mpres@tmXBLabelFontHeightF = 0.01
mpres@tmYLLabelFontHeightF = 0.01
; mpres@vpWidthF = 0.2 ; set width and height
; mpres@vpHeightF = 0.2
; mpres@vpXF = 0.1
; mpres@vpYF = 0.9
mpres11 =mpres
mpres12 =mpres
mpres13 =mpres
mpres21 =mpres
mpres22 =mpres
mpres23 =mpres
mpres31 =mpres
mpres32 =mpres
mpres33 =mpres
mpres41 =mpres
mpres42 =mpres
mpres43 =mpres
mpres11@tmXBOn = False
mpres11@tmYLOn = False
mpres12@tmXBOn = False
mpres12@tmYLOn = False
mpres13@tmXBOn = False
mpres13@tmYLOn = False
mpres21@tmXBOn = False
mpres21@tmYLOn = True
mpres22@tmXBOn = False
mpres22@tmYLOn = False
mpres23@tmXBOn = False
mpres23@tmYLOn = False
mpres31@tmXBOn = False
mpres31@tmYLOn = True
mpres32@tmXBOn = False
mpres32@tmYLOn = False
mpres33@tmXBOn = False
mpres33@tmYLOn = False
mpres41@tmXBOn = True
mpres41@tmYLOn = True
mpres42@tmXBOn = True
mpres42@tmYLOn = False
mpres43@tmXBOn = True
mpres43@tmYLOn = False
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
plots = new ( 12, graphic )
t_res = res
t_res@cnFillOn = True
t_res@lbLabelBarOn = False
t_res11=t_res
t_res11@ContourParameters = (/-100,100,20/)
t_res12=t_res
t_res12@ContourParameters = (/-100,100,10/)
t_res13=t_res
t_res13@ContourParameters =(/-50,50,10/)
t_res21=t_res11
t_res22=t_res12
t_res23=t_res13
t_res31=t_res11
t_res32=t_res12
t_res33=t_res13
t_res41=t_res11
t_res41@lbLabelBarOn = True
t_res42=t_res12
t_res42@lbLabelBarOn = True
t_res43=t_res13
t_res43@lbLabelBarOn = True
contour = wrf_contour(a,wks,x2-x1,t_res11)
plots(0) = wrf_map_overlays(a,wks,contour,pltres,mpres11)
delete(contour)
;**********************************************************
contour = wrf_contour(a,wks,x2d-x1d,t_res12)
plots(1) = wrf_map_overlays(a,wks,contour,pltres,mpres12)
delete(contour)
contour = wrf_contour(a,wks,x2n-x1n,t_res13)
plots(2) = wrf_map_overlays(a,wks,contour,pltres,mpres13)
delete(contour)
;***********************************************************
contour = wrf_contour(b,wks,x3-x1,t_res21)
plots(3) = wrf_map_overlays(b,wks,contour,pltres,mpres21)
delete(contour)
;**********************************************************************
contour = wrf_contour(b,wks,x3d-x1d,t_res22)
plots(4) = wrf_map_overlays(b,wks,contour,pltres,mpres22)
delete(contour)
;**********************************************************************
contour = wrf_contour(b,wks,x3n-x1n,t_res23)
plots(5) = wrf_map_overlays(b,wks,contour,pltres,mpres23)
delete(contour)
;**********************************************************************
contour = wrf_contour(c,wks,x1-x4,t_res31)
plots(6) = wrf_map_overlays(c,wks,contour,pltres,mpres31)
delete(contour)
;**********************************************************************
contour = wrf_contour(c,wks,x1d-x4d,t_res32)
plots(7) = wrf_map_overlays(c,wks,contour,pltres,mpres32)
delete(contour)
contour = wrf_contour(c,wks,x1n-x4n,t_res33)
plots(8) = wrf_map_overlays(c,wks,contour,pltres,mpres33)
delete(contour)
;**********************************************************************
contour = wrf_contour(d,wks,x1-x5,t_res41)
plots(9) = wrf_map_overlays(d,wks,contour,pltres,mpres41)
delete(contour)
;**********************************************************************
contour = wrf_contour(d,wks,x1d-x5d,t_res42)
plots(10) = wrf_map_overlays(d,wks,contour,pltres,mpres42)
delete(contour)
;**********************************************************************
contour = wrf_contour(d,wks,x1n-x5n,t_res43)
plots(11) = wrf_map_overlays(d,wks,contour,pltres,mpres43)
delete(contour)
;**********************************************************************
; Panel the WRF plots.
pnlres = True
; pnlres@gsnPanelYWhiteSpacePercent = 13 ; Add white space b/w plots.
; pnlres@gsnPanelLabelBar = True ; Turn on common labelbar
pnlres@gsnMaximize = True
pnlres@gsnPanelFigureStrings = (/"a","b","c","d","e","f","g","h","i","j","k","l"/) + ")
pnlres@gsnPanelLeftF=0.2
pnlres@gsnPanelRightF=0.2
pnlres@gsnPanelTopF=0.2
pnlres@gsnPanelDownF=0.2
gsn_panel(wks,plots,(/4,3/),pnlres)
end
为什么画出来的图总是最左边加上纬度 最下边要加上经度和colorbar才能和其他的一样大 这个问题怎么解决
|
-
|