- 积分
- 3287
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2017-4-27
- 最后登录
- 1970-1-1
|

楼主 |
发表于 2017-11-2 10:45:01
|
显示全部楼层
不好意思,这么晚才回复
function [lb0t3]=lb(data)
%0—3波分别在1—4位
a(1:13,1:73)=0;
b(1:13,1:73)=0;
%有限求和
for k=1:4
for y=1:73
for x=1:144
a(k,y)=a(k,y)+data(x,y).*cosd((k-1)*2.5*x);
b(k,y)=a(k,y)+data(x,y).*sind((k-1)*2.5*x);
end
end
end
%平均部分
a(1:13,1:73)=a(1:13,1:73)./72;
b(1:13,1:73)=b(1:13,1:73)./72;
a(1,1:73)=a(1,1:73)./2;
b(1,1:73)=b(1,1:73)./2;
%单波
for y=1:73
for x=1:144
lb(1,x,y)=a(1,y);
end
end
for k=2:4
for y=1:73
for x=1:144
lb(k,x,y)=a(k,y).*cosd((k-1)*2.5*x)+b(k,y).*sind((k-1)*2.5*x);
end
end
end
%行星尺度波0-3波
for y=1:73
for x=1:144
%lb0t3(x,y)=lb(1,x,y)+lb(2,x,y)+lb(3,x,y)+lb(4,x,y);
lb0t3(x,y)=lb(2,x,y)+lb(3,x,y)+lb(4,x,y);
end
end |
|