小波分析.信号重构去噪matlab源程序

clear;loadnoissin;%装载原始noissin信号s=noissin;figure;subplot(6,1,1);plot(s);ylabel('s');%使用db5小波对信号进行5层分解[C,L]=wavedec(s,5,'db5');%实现多尺度一维离散小波变换函数fori=1:6%对分解的第5层到第一层的低频系数进行重构a=wrcoef('a',C,L,'db5',6-i);subplot(6,1,i+1);plot(a);ylabel(['a',num2str(6-i)]);endfigure;subplot(6,1,1);plot(s);ylabel('s');fori=1:6%对分解的第5层到第一层的高频系数进行重构d=wrcoef('d',C,L,'db5',6-i);subplot(6,1,i+1);plot(d);ylabel(['d',num2str(6-i)]);end