例程12-8.m

来自「《小波分析理论与Matlab7实现》书中例程」· M 代码 · 共 15 行

% 当前的延拓模式是补零
% 装载信号
load noisdopp; 
x = noisdopp;
% 使用默认熵（shannon熵），用db1小波对x进行3层分解
wpt = wpdec(x,3,'db1'); 
% 分解小波包[3 0]
wpt = wpsplt(wpt,[3 0]);
% 画出小波包树
plot(wpt)
% 计算最优小波包树
blt = bestlevt(wpt);
% 画出最优小波包树
plot(blt)