- 积分
- 7129
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2016-7-4
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
1.设置经纬度怎么没效果?
2.怎么感觉我这向量图和官网的差好多啊?
代码如下:
; load "$NCARG_ROOT[img]file:///C:/Users/jx/AppData/Local/Temp/)A[Y)I~](ZC9Z[3Y)IDK7LK.gif[/img]b/ncarg/nclscripts/csm/gsn_code.ncl"
;load "$NCARG_ROOT[img]file:///C:/Users/jx/AppData/Local/Temp/)A[Y)I~](ZC9Z[3Y)IDK7LK.gif[/img]b/ncarg/nclscripts/csm/gsn_csm.ncl"
; load "$NCARG_ROOT[img]file:///C:/Users/jx/AppData/Local/Temp/)A[Y)I~](ZC9Z[3Y)IDK7LK.gif[/img]b/ncarg/nclscripts/csm/contributed.ncl"
load "$NCARG_ROOT[img]file:///C:/Users/jx/AppData/Local/Temp/)A[Y)I~](ZC9Z[3Y)IDK7LK.gif[/img]b/ncarg/nclscripts/csm/shea_util.ncl"
load "$NCARG_ROOT[img]file:///C:/Users/jx/AppData/Local/Temp/)A[Y)I~](ZC9Z[3Y)IDK7LK.gif[/img]b/ncarg/nclscripts/cnmap/cnmap.ncl"
begin
a = addfile("$NCARG_ROOT[img]file:///C:/Users/jx/AppData/Local/Temp/)A[Y)I~](ZC9Z[3Y)IDK7LK.gif[/img]b/ncarg/nclscripts/uv-wind/uv_wind.nc","r")
u = short2flt(a->u(0,:,:))
v = short2flt(a->v(0,:,:))
wks = gsn_open_wks("png","vector") ; send graphics to PNG file
gsn_define_colormap( wks ,"rainbow")
;>--------------------------------------------<
; set for the map
;>--------------------------------------------<
res = True
res@mpMinLatF = 15.
res@mpMaxLatF = 55.
res@mpMinLonF = 72.
res@mpMaxLonF = 136.
res@mpFillOn = True
res@mpOutlineOn = False ; Use outlines from shapefile
res@cnFillDrawOrder = "PreDraw"
res@mpDataBaseVersion = "MediumRes"
res@mpDataSetName = "Earth..4"
res@mpAreaMaskingOn = True
res@mpMaskAreaSpecifiers = (/"China","Taiwan","Disputed area between India and China","India:Arunachal Pradesh"/)
res@mpLandFillColor = "white"
res@mpInlandWaterFillColor = "white"
res@mpOceanFillColor = "white"
res@mpOutlineBoundarySets = "NoBoundaries"
;>--------------------------------------------<
vcres =True
vcres@gsnFrame = False ; so we can draw time stamp
vcres@vcRefAnnoOrthogonalPosF = -1.0 ; move ref vector up
vcres@vcRefMagnitudeF = 10.0 ; define vector ref mag
vcres@vcRefLengthF = 0.045 ; define length of vec ref
vcres@vcRefAnnoArrowLineColor ="red" ; jian tou yan se
vcres@vcRefAnnoArrowUseVecColor = False
vcres@vcGlyphStyle = "CurlyVector" ; turn on curly vectors
vcres@vcLineArrowColor ="white"
vcres@vcLineArrowThicknessF =1.25
vcres@vcVectorDrawOrder ="PostDraw"
vcres@vcMinDistanceF = 0.01
vcres@vcMonoLineArrowColor =False
vector = gsn_csm_vector_map(wks,u,v,vcres)
;>============================================================<
; add China map
;>------------------------------------------------------------<
cnres = True
cnres@china = True ;draw china map or not
cnres@river = True ;draw changjiang&huanghe or not
cnres@province = True ;draw province boundary or not
cnres@nanhai = False ;draw nanhai or not
cnres@diqu = False ;draw diqujie or not
chinamap = add_china_map(wks,vector,cnres)
;>============================================================<
draw(vector)
frame (wks)
end
|
|