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

波变换

开发平台:

Matlab

  1. function N = pnorm(T,P)
  2. %PNORM Pseudo-norm for a Laurent polynomial.
  3. %   For a Laurent polynomial T, N = PNORM(T,P) returns
  4. %   the norm NORM(V,P) of the vector V which contains the 
  5. %   the coefficients of T. So:
  6. %       PNORM(T,P)    = sum(abs(V).^P)^(1/P).
  7. %       PNORM(T,inf)  = max(abs(V)).
  8. %       PNORM(T,-inf) = min(abs(V)).
  9. %
  10. %   N = PNORM(T) is equivalent to N = PNORM(T,2).
  11. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 03-Jul-2003.
  12. %   Last Revision: 16-Jul-2003.
  13. %   Copyright 1995-2004 The MathWorks, Inc.
  14. %   $Revision: 1.1.6.2 $  $Date: 2004/04/13 00:39:03 $
  15. if nargin<2 , P = 2; end
  16. N = norm(T.coefs,P);