资源简介
usemakedir为按照年份创建文件夹,duqu_ncep为读取ncep的风场nc文件,duqu_ecmwf为读取ECMWF的风场nc文件,windin为将读取完的风场数据分批储存,便于SWAN调用
代码片段和文件信息
clear all; close all; clc;
tic
for yearnum=1979:2017
cd([‘F:\pythondownload\separate\‘num2str(yearnum)]) %打开年份文件夹
for monthnum=6:12
cd([‘F:\pythondownload\separate\‘num2str(yearnum)]);
if monthnum<10
filename{monthnum}=[num2str(yearnum)‘0‘num2str(monthnum)];
else
filename{monthnum}=[num2str(yearnum)num2str(monthnum)];
end
filen1=strcat([filename{monthnum}‘.nc‘]); %读入文件名
ncid = netcdf.open(filen1‘NC_NOWRITE‘); %打开文件
lat=double(ncread(filen1‘latitude‘)); %读入‘2009年1月有效波高.nc‘文件中的纬度,变量名字不能改
lon=double(ncread(filen1‘longitude‘)); %读入经度
[lon1lat1]=meshgrid(lonlat);
% [lat1lon1]=meshgrid(latlon);
U10=ncread(filen1‘u10‘); %读入有效波高
V10=ncread(filen1‘v10‘); %读入有效波高
lonswn = [118:0.125:124]; %29 118 0 64 48 0.125 0.125
latswn = [29:0.125:37];
[lon2lat2] = meshgrid(lonswnlatswn);
TimeData=ncread([filename{monthnum}‘.nc‘]‘time‘);
disp(strcat(‘Done reading‘filen1)); %显示功能显示所需要的数据变量等已经输入完毕
% A=u10(5050:)
% B=shiftdim(A2)
T=double(TimeData);
L=(T-T(1))/24;
R=datenum(yearnummonthnum1000);
format long;
% BEGIN=(datenum(20111213000)-R)*24;
% END=(datenum(201211201200)-R)*24;
K=R+L;
DateString = datestr(K‘yyyymmddHH‘);
if mod(yearnum4)==0
monthFeb=29;
else
monthFeb=28;
end
if monthnum==1 || monthnum==3 || monthnum==5 || monthnum==7 || monthnum==8 || monthnum==10 || monthnum==12
daynum=31;
elseif monthnum==2
daynum=monthFeb;
else
daynum=30;
end
for i=1:(daynum*4)
aa(i:)=strcat(DateString(i:)‘.txt‘);
end
% aaa=DateString(1:)
% DateString = datestr(989550/24+R‘yyyymmddHH‘)
cd([‘F:\pythondownload\windtxt\‘num2str(yearnum)‘\‘filename{monthnum}]);
for i=1:(daynum*4)
w=[];
name=strcat(DateString(i:)‘.txt‘);
curfold =pwd;
fid=fopen(strcat(curfold‘\‘name)‘wt+‘);
u=double(U10(::i)‘);
v=double(V10(::i)‘);
uq = griddata(lon1lat1ulon2lat2); uq(isnan(uq))=0;
vq = griddata(lon1lat1vlon2lat2); vq(isnan(vq))=0;
w = [uq;vq];
dlmwrite(strcat(curfold‘\‘name)w‘delimiter‘‘\t‘);
fclose(fid);
x=w‘;
%bb(i1:2)=x;
end
toc
clearvars -exce
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
文件 3425 2018-08-08 18:58 duqu_ecmwf.m
文件 2069 2018-07-25 18:14 duqu_ncep.m
文件 1700 2018-09-01 17:30 usemakedir.m
文件 1365 2018-08-15 17:27 windin.m
----------- --------- ---------- ----- ----
8559 4
- 上一篇:BCD码优先编码电路设计
- 下一篇:ID3算法 matlab代码实现
相关资源
- Pattern Recognition and Machine Learning(高清
- MATLAB 编程 第二版 Stephen J. Chapman 著
- 均值滤波和FFT频谱分析Matlab代码
- 《MATLAB扩展编程》代码
- HDB3码、AMI码的MATLAB实现
- 3点GPS定位MATLAB仿真
- MATLAB数字信号处理85个实用案例精讲入
- matlab从入门到精通pdf94795
- 欧拉放大论文及matlab代码
- 跳一跳辅助_matlab版本
- 全面详解LTE MATLAB建模、仿真与实现
- MIMO-OFDM无线通信技术及MATLAB实现_孙锴
- MATLAB Programming for Engineers 4th - Chapman
- matlab 各种谱分析对比
- 分数阶chen混沌matlab程序
- 基于粒子群算法的非合作博弈的matl
- MATLAB车流仿真 包括跟驰、延误
- matlab空间桁架计算程序
- 基于MATLAB的图像特征点匹配和筛选
- DMA-TVP-FAVAR
- GPS信号的码捕获matlab代码.7z
- 一维光子晶体MATLAB仿真代码吸收率折
- newmark法源程序
- 传统关联成像、计算鬼成像matlab
- pri传统分选算法
- 摆动滚子推杆盘形凸轮设计
- 医学图像重建作业matlab源码
- Matlab实现混沌系统的控制
- 检测疲劳驾驶
- Matlab锁相环仿真-Phase Locked Loop.rar
评论
共有 条评论