lianxu.m

小波变换用于半导体激光器可靠性分析的全部程序。我只完成了其中一部分

load e:\data\vfa036.dat;
x=vfa036(512:1000);
figure(1);
subplot(2,1,1); 
plot(x);
% 用'db4'小波对x进行一维连续小波变换
subplot(2,1,2);
wx=cwt(x,[2:4:20],'db4','plot');
ylabel('变换尺度');
a=sum(wx(2));

load e:\data\vfa022.dat;
y=vfa022(512:1000);
figure(2);
subplot(2,1,1); 
plot(y);
% 用'db4'小波对y进行一维连续小波变换
subplot(2,1,2);
wy=cwt(y,[2:4:20],'db4','plot');
ylabel('变换尺度');