基本信息

---

下载

   友情提示：（无需注册或充值，赞助后即可获取资源下载链接）

---

     嘿，亲！知识可是无价之宝呢，但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下，绝对物超所值哦！如有下载和支付问题，请联系我们QQ(微信同号)：813200300

本次赞助数额为： 2 元　

支付宝支付

微信支付

   源码介绍

---

clear all;

% set the da

ta path

path='';
fnm='';

file1=[path,fnm];
data=load(file1);
dims=size(data);
row=dims(1);
col=dims(2);
Nt=row;

% define station information
LON=109.5;     % longititude of the station
LAT=35.817;      % latitude  of the station
alt=1159.8;       % altitude  of the station
h=10;             % hight of the wind speed

% define variables
year=data(:,2);
month=data(:,3);
day=data(:,4);
Pre=data(:,5)/100;           % mean air pressure of the day
Tmean0=data(:,6)/10;         % mean tempreture of the day
Tmax=data(:,7)/10;          % max tempreture of the day
Tmin=data(:,8)/10;          % min tempreture of the day
RH=data(:,9)/100;            % mean relative humidity of the day
RHmin=data(:,10)/100;        % min relative humidity of the day
P=data(:,11)/10;            % precipitation of the day
WS=data(:,12)/10;           % mean wind speed of the day
WSmax=data(:,13);        % max wind speed of the day
SD=data(:,17)/10;           % duration of sunshine  

% year series
yr_beg=1981;
yr_end=year(Nt);
Ny=yr_end-yr_beg 1;
yr_arr0=yr_beg:1:yr_end;
yr_arr=reshape(yr_arr0,Ny,1);
yr_beg=2009;
yr_end=year(Nt) yr_beg;
Ny=yr_end-yr_beg 1; % years,Ny=6
yr_arr0=yr_beg:1:yr_end;
yr_arr=reshape(yr_arr0,Ny,1);
%%
% *********start to calculate the ET by Pemann-Montieth Equation***********
% ********step 1:mean daily tempreture********
% Tmean=zeros(Nt,1);
Tmean=(Tmax Tmin)/2;   % Tmean in PM method
% ********step 2:wind speed********
  % u=WS*4.87/ln(67.8*h-5.42);in fact,ln is in format log:log=ln
    % h=10 ，so 4.87/ln(67.8*h-5.42)=0.7480
u=WS*0.7480;