program_17_01_special.m

这是基于MATLAB系统上开发的,应用于小波分析方面,很有用的程序模块,书名为"MATLAB在小波分析中的应用"

%装载语音信号
N=1024;
s=wavread('fem.wav',N);
figure(1);
plot(1:N,s,'LineWidth',2);
xlabel('时间 n');ylabel('幅值 A');
s=s+0.001*randn(1,N)';
%用小波db3对s进行5层分解
level=5;
[c,l]=wavedec(s,level,'db3');  
%选用全局阈值进行信号增强处理
thr=5;  
[sd,csd,lsd,perf0,perfl2]=wdencmp('gbl',c,l,'db3',level,thr,'h',1);  
figure(2);
subplot(2,1,1); plot(s,'LineWidth',2);  
title('加噪声后的信号');  
%xlabel('时间 n');
ylabel('幅值 A');
subplot(2,1,2);  
plot(sd,'LineWidth',2); title('压缩后的信号'); 
xlabel('时间 n');ylabel('幅值 A');