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

波变换

开发平台:

Matlab

  1. function Mnew = newvar(M,var)
  2. %NEWVAR Change variable in a Laurent matrix.
  3. %   MNEW = NEWVAR(M,VAR) returns the Laurent matrix MNEW 
  4. %   which is obtained by doing a change of variable VAR.
  5. %   The valid choices for VAR are:
  6. %       'z^2': M(z) ---> M(z^2)
  7. %       '-z' : M(z) ---> M(-z)
  8. %       '1/z': M(z) ---> M(1/z)
  9. %       'sqz': M(z) ---> M(sqrt(z))
  10. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 17-Jun-2002.
  11. %   Last Revision 12-Jun-2003.
  12. %   Copyright 1995-2004 The MathWorks, Inc.
  13. %   $Revision: 1.1.6.2 $ $Date: 2004/04/13 00:39:20 $ 
  14. A = M.Matrix;
  15. [nbr,nbc] = size(A);
  16. for r = 1:nbr
  17.     for c = 1:nbc
  18.         A{r,c} = newvar(A{r,c},var);
  19.     end
  20. end
  21. Mnew = laurmat(A);