分享一个计算风向的程序

天坑一地坑 · 发表于 2016-12-6 12:48:13

登录后查看更多精彩内容~

您需要登录才可以下载或查看，没有帐号？立即注册

x

%% 计算风向
for i = 1:length(U)
if U(i,1)>0&V(i,1)>0
         dir(i,1) = 270-atan(V(i,1)./U(i,1))*180/pi;
elseif U(i,1)<0&V(i,1)>0
         dir(i,1) = 90-atan(V(i,1)./U(i,1))*180/pi;
elseif U(i,1)<0&V(i,1)<0
         dir(i,1) = 90-atan(V(i,1)./U(i,1))*180/pi;
elseif U(i,1)>0&V(i,1)<0
         dir(i,1) = 270-atan(V(i,1)./U(i,1))*180/pi;
elseif U(i,1)==0&V(i,1)<0
         dir(i,1) = 180;
elseif U(i,1)==0&V(i,1)<0
         dir(i,1) = 0;
elseif U(i,1)>0&V(i,1)==0
         dir(i,1) = 270;
elseif U(i,1)<0&V(i,1)==0
         dir(i,1) = 90;
else U(i,1)==0&V(i,1)==0
         dir(i,1) = nan;
end
end
%% 风向反向处理
for i = 1:length(dir)
if dir(i,1)>=180
      dir(i,1) = dir(i,1)-180;
else
      dir(i,1) = dir(i,1)+180;
end
end

etiec56 · 发表于 2016-12-6 13:01:44

刚开始学，

{:eb302:}

etiec56 · 发表于 2016-12-6 13:02:18

{:lxm_20:}怎么会这么多金钱，我的天哪

etiec56 · 发表于 2016-12-6 13:05:10

求助我自学作图的时候最后做出了这么一个7个月特征时间尺度小波实部过程线，可是不会读图

etiec56 · 发表于 2016-12-6 13:07:05

准备做本县的气候分析，如果申请课题能过么。。。大神们

etiec56 · 发表于 2016-12-6 13:07:31

好吧，我再水两把，好多钱

etiec56 · 发表于 2016-12-6 13:07:41

回帖金钱好多

etiec56 · 发表于 2016-12-6 13:08:10

最后一次，楼主我要给你生孩子

qxjy123 · 发表于 2016-12-7 18:57:23

不错，谢谢楼主分享

莎朗嘿哟YY · 发表于 2017-1-16 14:32:46

学习了谢谢楼主~

		自动登录	找回密码
密码			立即注册

[程序设计] 分享一个计算风向的程序

登录后查看更多精彩内容~

回帖奖励 +550 金钱

回帖奖励 +550 金钱

回帖奖励 +550 金钱

回帖奖励 +550 金钱

回帖奖励 +550 金钱

回帖奖励 +550 金钱

回帖奖励 +550 金钱