- 积分
- 2916
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2019-1-19
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2019-9-1 11:37:04
|
显示全部楼层
按照你说的方法做了 结果没有报错也没有出图
脚本如下:
countour_dv = wrf_contour(a,wks, dv_plane(0:zmax_pos,:), opts_dv)
countour_dv1 = wrf_contour(a1,wks, dv_plane1(0:zmax_pos1,:), opts_dv1)
countour_dv2 = wrf_contour(a2,wks, dv_plane2(0:zmax_pos2,:), opts_dv2)
contour_ter = gsn_csm_xy(wks,X_plane,ter_plane,opts_ter)
contour_ter1 = gsn_csm_xy(wks,X_plane1,ter_plane1,opts_ter1)
contour_ter2 = gsn_csm_xy(wks,X_plane2,ter_plane2,opts_ter2)
vector = wrf_vector(a,wks,u_plane(0:zmax_pos,:),w_plane(0:zmax_pos,:)*10.,vcres)
vector1 = wrf_vector(a1,wks,u_plane1(0:zmax_pos1,:),w_plane1(0:zmax_pos1,:)*10.,vcres1)
vector2 = wrf_vector(a2,wks,u_plane2(0:zmax_pos2,:),w_plane2(0:zmax_pos2,:)*10.,vcres2)
res = True
res@gsnDraw = False
res@gsnFrame = False
plots(0) = wrf_overlays(a,wks,(/countour_dv,vector,contour_ter/),res) ; plot x-section
plots(1) = wrf_overlays(a1,wks,(/countour_dv1,vector1,contour_ter/),res) ; plot x-section
plots(2) = wrf_overlays(a2,wks,(/countour_dv2,vector2,contour_ter2/),res) ; plot x-section
; Delete options and fields, so we don't have carry over
delete(opts_xy)
delete(ter_plane)
delete(opts_xy1)
delete(ter_plane1)
delete(opts_xy2)
delete(ter_plane2)
;set panel
pnlres = res
pnlres@gsnPanelCenter = True
pnlres@gsnPanelLabelBar = True
pnlres@lbOrientation = "Vertical"
pnlres@lbLabelPosition = "Right"
pnlres@pmLabelBarParallelPosF = 0.0
pnlres@pmLabelBarOrthogonalPosF = 0.0
pnlres@pmLabelBarWidthF = 0.05
pnlres@pmLabelBarHeightF = 0.15
pnlres@gsnPanelRowSpec = True
pnlres@gsnPanelYWhiteSpacePercent = 5
pnlres@gsnPanelScalePlotIndex = 1
pnlres@amJust = "TopLeft"
gsn_panel(wks, (/plots/), (/3/), pnlres)
end |
|