- 积分
- 223
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-12-20
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2015-12-25 16:47:49
|
显示全部楼层
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/shea_util.ncl"
; ================================================;
begin
year=ispan(1910,2014,1)
nyear = dimsizes(year)
lat=new(2823,float)
lon=new(2823,float)
do i = 1,2823,1
lat(i-1) = fbindirread("C:\Users\xhr2xx\Desktop\USDA data\corn\corn_grain_acres_harvested\jwd.grd",2*i-2,1,"float")
lon(i-1) = fbindirread("C:\Users\xhr2xx\Desktop\USDA data\corn\corn_grain_acres_harvested\jwd.grd",2*i-1,1,"float")
end do
lat@units = "degrees_north"
lon@units = "degrees_east"
var = new((/nyear,2823,2823/),"float",-9999)
var!0 = "year"
var!1 = "lat"
var!2 = "lon"
var&year = ispan(1,365,1)
var&lat = lat
var&lon = lon
var = 0.0
do i = 1,28823,1
do iy=1,105,1
var(iy-1,lat(i-1),lon(i-1)) = fbindirread("C:\Users\xhr2xx\Desktop\USDA data\corn\corn_grain_acres_harvested\zzsj.grd",105*(i-1)+iy-1,1,"float")
var@_FillValue = -9999
end do
end do |
|