% 當前延拓模式是補零
% 裝載信號
load noisdopp; x = noisdopp;
% 使用db1小波包對x進行3層分解，使用shannon熵
wpt = wpdec(x,3,'db1');
% 畫出小波包樹
plot(wpt)
% 剪掉第2層小波包樹
nwpt = wpcutree(wpt,2);
% 畫出新的小波包樹
plot(nwpt)