wdtsplit.m
上传用户:haiyisale
上传日期:2013-01-09
资源大小:3246k
文件大小:1k
源码类别:

波变换

开发平台:

Matlab

  1. function [t,varargout] = wdtsplit(t,node)
  2. %WDTSPLIT Split (decompose) wavelet packet.
  3. %   WDTSPLIT updates a wavelet packet tree after
  4. %   the decomposition of a node.
  5. %
  6. %   T = WDTSPLIT(T,N) returns the modified tree T
  7. %   corresponding to the decomposition of the node N.
  8. %
  9. %   For a 1-D decomposition: [T,CA,CD] = WDTSPLIT(T,N)
  10. %   with CA = approximation and CD = detail of node N.
  11. %
  12. %   For a 2-D decomposition: [T,CA,CH,CV,CD] = WDTSPLIT(T,N)
  13. %   with CA = approximation and CH, CV, CD = (Horiz., Vert. and
  14. %   Diag.) details of node N.
  15. %
  16. %   See also WAVEDEC, WAVEDEC2, WPDEC, WPDEC2, WPJOIN.
  17. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 13-Mar-2003.
  18. %   Last Revision: 13-Mar-2003.
  19. %   Copyright 1995-2004 The MathWorks, Inc.
  20. %   $Revision: 1.1.6.2 $  $Date: 2004/03/15 22:39:02 $
  21. % Check arguments.
  22. msg = nargoutchk(1,5,nargout); error(msg);
  23. msg = nargchk(2,2,nargin); error(msg);
  24. % Decomposition of the node.
  25. [t,child,varargout] = nodesplt(t,node);
  26. if isempty(child)
  27.     errargt(mfilename,'Invalid node value','msg');
  28.     return
  29. end