- 积分
- 28
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2018-12-28
- 最后登录
- 1970-1-1
|
发表于 2020-12-12 09:45:27
|
显示全部楼层
;计算绘制剖面图的数据,;(注:坐标超过地图范围,则无法绘图)
leftlat = 30.75
rightlat = 33.75
leftlon = 115.25
rightlon = 118.25
npts = 100 ; number of points in resulting transect
dist = gc_latlon(leftlat,leftlon,rightlat,rightlon,npts,2) ;计算剖面直线的坐标点(经度、纬度)
points = ispan(0,npts-1,1)*1.0 ;计算剖面直线点的序列
;printVarSummary(dist)
;print("("+dist@gclat + " , " + dist@gclon + ")")
;计算显示剖面的数据
;trans = linint2_points(t&lon_t,t&lat_t,t,True,dist@gclon,dist@gclat,2) ;计算的数据不含坐标
Tt = linint2_points_Wrap(lon({leftlon:rightlon}),lat({leftlat:rightlat}),t(:,:,{leftlat:rightlat},{leftlon:rightlon}),True,dist@gclon,dist@gclat,2) ;计算的数据含坐标
Tu = linint2_points_Wrap(lon({leftlon:rightlon}),lat({leftlat:rightlat}),u(:,:,{leftlat:rightlat},{leftlon:rightlon}),True,dist@gclon,dist@gclat,2)
Tv = linint2_points_Wrap(lon({leftlon:rightlon}),lat({leftlat:rightlat}),v(:,:,{leftlat:rightlat},{leftlon:rightlon}),True,dist@gclon,dist@gclat,2)
。。。。。。
uvplot4 = gsn_csm_vector(wks, Tv(Lst,:,:), Tw1(Lst,:,:), wvres) ;垂直风场
dplot4 = gsn_csm_contour(wks, Td(Lst,:,:), dres) ;散度
dplot4 = ColorNegDashZeroPosContour(dplot4,"blue","black","brown")
plots(4) = dplot4
overlay(plots(4) ,uvplot4)
。。。。
gsn_panel(wks, plots, (/2,2/), panres)
以上程序,基本涵盖所有任意剖面绘图,结合官方函数,搞定没问题 |
|