www.pudn.com > asr.rar > dwpem5.m, change:2004-11-06,size:689b

load noisdopp; 
x=noisdopp; 
WTBXMNGR('v1'); 
[t,d]=wpdec(x,3,'db1','shannon'); 
%t=wptree(2,3,sg1,'db2') 
plottree(t); 
s30=wprcoef(t,d,[3,0]); 
s31=wprcoef(t,d,[3,1]); 
s32=wprcoef(t,d,[3,2]); 
s33=wprcoef(t,d,[3,3]); 
s34=wprcoef(t,d,[3,4]); 
s35=wprcoef(t,d,[3,5]); 
s36=wprcoef(t,d,[3,6]); 
s37=wprcoef(t,d,[3,7]); 
subplot(9,2,3); 
plot(s30); 
Ylabel('s30'); 
subplot(9,2,5); 
plot(s31); 
Ylabel('s31'); 
subplot(9,2,7); 
plot(s32); 
Ylabel('s32'); 
subplot(9,2,9); 
plot(s33); 
Ylabel('s33'); 
subplot(9,2,11); 
plot(s34); 
Ylabel('s34'); 
subplot(9,2,13); 
plot(s35); 
Ylabel('s35'); 
subplot(9,2,15); 
plot(s36); 
Ylabel('s36'); 
subplot(9,2,17); 
plot(s37); 
Ylabel('s37');