MeteoInfo脚本示例：MICAPS第4类数据转为NetCDF

bj137255103

谢谢楼主分享

十月的天空

谢谢老师！对新手来说太有用了

wuwei2163

MeteoInfo 发表于 2012-12-19 11:43

                               
登录/注册后可看大图

王老师，你好！最近我也遇到相似的问题，研究这个帖子也很久了，由于我的数据上时间和上面的不太一样，关于时间的设置还是不会改的，请求王老师帮帮忙，比较急用！！！

这是你之前编写的处理micaps多层次多时间数据的程序，请你根据我数据的时间告诉我怎么改时间设置的，麻烦您了
#--------------------------------------------------------
# Author: Yaqiang Wang
# Date: 2012-12-11
# Purpose: Convert MICAPS 4 grid data to NetCDF data format
# Note: Sample
#-----------------------------------------------------------
import clr
clr.AddReferenceByPartialName("System.Windows.Forms")
clr.AddReferenceByPartialName("System.Drawing")
from System import *
from System.Windows.Forms import *
from System.Drawing import *
clr.AddReference("MeteoInfoC.dll")
from MeteoInfoC import *
from MeteoInfoC.Data import *
from MeteoInfoC.Data.MeteoData import *

import os.path
import datetime
import time

#---- Set data folder
dataDir = "y:\\ecmwf\\R\\"

#---- Open a MICAPS 4 Data file to get the information
inDataInfo = MeteoDataInfo()
infile = dataDir + "1000\\14031708.000"
inDataInfo.OpenMICAPSData(infile)
undef = inDataInfo.UNDEF
lons = inDataInfo.GetX()
lats = inDataInfo.GetY()
lonNum = lons.Length
latNum = lats.Length
ls = [1000, 925, 850, 700, 500, 300, 100]
levelNum = len(ls)
levels = Array.CreateInstance(Double, levelNum)
i = 0
for l in ls:
        levels = l;
        i += 1

#---- Create netCDF data info object
outfilepath = "D:\\" + "test.nc"
outDataInfo = NetCDFDataInfo()
outDataInfo.fileName = outfilepath
outDataInfo.UNDEF = undef
outDataInfo.unlimdimid = 3

#---- Add dimensions: lon, lat, level, time
lonDim = outDataInfo.AddDimension("lon", lonNum)
latDim = outDataInfo.AddDimension("lat", latNum)
levelDim = outDataInfo.AddDimension("level", levelNum)
timeDim = outDataInfo.AddDimension("time", -1)

#---- Add variables
outDataInfo.AddVariable("lon", NetCDF4.NcType.NC_DOUBLE, Array[Dimension]([lonDim]))
outDataInfo.AddVariable("lat", NetCDF4.NcType.NC_DOUBLE, Array[Dimension]([latDim]))
outDataInfo.AddVariable("level", NetCDF4.NcType.NC_DOUBLE, Array[Dimension]([levelDim]))
outDataInfo.AddVariable("time", NetCDF4.NcType.NC_DOUBLE, Array[Dimension]([timeDim]))
outDataInfo.AddVariable("temadv", NetCDF4.NcType.NC_DOUBLE, Array[Dimension]([timeDim, levelDim, latDim, lonDim]))
#---- Add variable attributes
outDataInfo.AddVariableAttribute("lon", "units", "degrees_east")
outDataInfo.AddVariableAttribute("lon", "long_name", "longitude")
outDataInfo.AddVariableAttribute("lat", "units", "degrees_north")
outDataInfo.AddVariableAttribute("lat", "long_name", "latitude")
outDataInfo.AddVariableAttribute("level", "units", "level");
outDataInfo.AddVariableAttribute("level", "long_name", "level");
outDataInfo.AddVariableAttribute("level", "axis", "z");
outDataInfo.AddVariableAttribute("time", "units", "hours since 1800-1-1 00:00:00")
outDataInfo.AddVariableAttribute("time", "long_name", "time")
outDataInfo.AddVariableAttribute("temadv", "units", "No")
outDataInfo.AddVariableAttribute("temadv", "long_name", "TemperatureAdvection")
outDataInfo.AddVariableAttribute("temadv", "missing_value", undef)

#---- Add global attributes
outDataInfo.AddGlobalAttribute("title", "Temperature advection field data")
outDataInfo.AddGlobalAttribute("description", "script sample data")

#---- Create netCDF file
outDataInfo.CreateNCFile(outfilepath)

#---- Write lon, lat, level, time data
outDataInfo.WriteVar("lon", lons)
outDataInfo.WriteVar("lat", lats)
outDataInfo.WriteVar("level", levels)

timeArray = Array.CreateInstance(Double, 8)
times = []
st = datetime.datetime(1800, 1, 1, 0, 0, 0)
t = datetime.datetime(2014, 03, 17, 8, 0, 0)        
for i in range(0, 9):        
        times.append(t)
        delta = t - st
        hours = (delta.days * 86400 + delta.seconds) / 3600.0
        t = t + datetime.timedelta(hours=12)
        timeArray = hours
        print timeArray

startArray = Array.CreateInstance(int, 1)
countArray = Array.CreateInstance(int, 1)
startArray[0] = 0
countArray[0] = len(times)
outDataInfo.WriteVara("time", startArray, countArray, timeArray)

#---- Write data
tidx = 0
for t in times:
        lidx = 0
        for l in ls:
                infile = dataDir + str(l) + "\\" + t.strftime("%y%m%d%H") + ".000"
                print infile
                if os.path.isfile(infile):
                        print infile
                        inDataInfo.OpenMICAPSData(infile)
                        gdata = inDataInfo.GetGridData("var")
                        dataArray = gdata.ToOneDimData()        
                        startArray = Array.CreateInstance(int, 4)
                        countArray = Array.CreateInstance(int, 4)
                        startArray[0] = tidx
                        startArray[1] = lidx
                        startArray[2] = 0
                        startArray[3] = 0
                        countArray[0] = 1
                        countArray[1] = 1
                        countArray[2] = latDim.DimLength
                        countArray[3] = lonDim.DimLength
                        outDataInfo.WriteVara("temadv", startArray, countArray, dataArray)
                lidx += 1
        tidx += 1

#---- Close netCDF file
outDataInfo.CloseNCFile()

print 'Finished...!'

wuwei2163

njzqxt 发表于 2012-12-18 11:31

                               
登录/注册后可看大图

王老师，谢谢了。
    我这试了多次也无法正确转出数据啊。
    数据放在K:\physic\ttadv\下的分别为 ...

你好，我也遇到了跟你同样的错误，可以运行，但是结果不对，时间也对不上，换了新的版本也没有解决，请问你是怎么解决的？？？

MeteoInfo

wuwei2163 发表于 2014-3-17 17:01

                               
登录/注册后可看大图

王老师，你好！最近我也遇到相似的问题，研究这个帖子也很久了，由于我的数据上时间和上面的不太一样，关 ...

我这里是没有问题的，也没办法知道你的问题到底在哪里，我把脚本程序附上。
m4tonc-1.py (4.63 KB, 下载次数: 29)

2014-3-19 08:51 上传

点击文件名下载附件

wuwei2163

MeteoInfo 发表于 2014-3-19 08:52

                               
登录/注册后可看大图

我这里是没有问题的，也没办法知道你的问题到底在哪里，我把脚本程序附上。

王老师，用您的程序运行，错误提示为 ，我的起始数据的文件名是14031708.000，而您脚本程序里导入的文件名确是14031708.000.000，不知道这是您的失误，还是我理解上有问题？？？

MeteoInfo

wuwei2163 发表于 2014-3-19 09:36

                               
登录/注册后可看大图

王老师，用您的程序运行，错误提示为，我的起始数据的文件名是14031708.000，而您脚本程序里导入的文件名 ...

你贴出来的示例数据就是.000.000后缀，如果只有一个.000，改一条语句就可以了：
infile = dataDir + str(l) + '\\' + st.strftime("%y%m%d%H") + tstr + tstr
改为：
infile = dataDir + str(l) + '\\' + st.strftime("%y%m%d%H") + tstr

wuwei2163

MeteoInfo 发表于 2014-3-19 10:41

                               
登录/注册后可看大图

你贴出来的示例数据就是.000.000后缀，如果只有一个.000，改一条语句就可以了：
infile = dataDir + str ...

王老师，在您的耐心指导下，终于可以运行出结果了，之所以出错，是因为文件名后缀的问题，改过之后就可以了，还有个就是版本的问题，老版的一运行就会出错，在这里建议大家还是下载最新的版本，王老师，再次向您表示我的谢意，让我这几天有了不少的收获。

王楠_20120014

我就是过来膜拜膜拜！！！！！

王楠_20120014

继续研究{:eb513:}{:eb513:}