% 裝載一維信號(hào)
load noisbloc; s = noisbloc;
% 畫出原始信號(hào)
subplot(311);
plot(s);
title('原始信號(hào).');    
% 使用db1在第3層進(jìn)行SWT分解
swc = swt(s,3,'db1');
% 第2種實(shí)現(xiàn)方法.
[swa,swd] = swt(s,3,'db1');
% 從平穩(wěn)小波分解結(jié)構(gòu)swc中，重構(gòu)s
a0 = iswt(swc,'db1');
% 畫出原始信號(hào)
subplot(312);
plot(a0);
title('重構(gòu)信號(hào)1.'); 
% 第2種實(shí)現(xiàn)方法
a0bis = iswt(swa,swd,'db1');
% 畫出原始信號(hào)
subplot(313);
plot(a0bis);
title('重構(gòu)信號(hào)2.'); 
% 檢查重構(gòu)的效果
err = norm(s-a0)
errbis = norm(s-a0bis)