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

波变换

开发平台:

Matlab

  1. function hh = wylabel(string,varargin)
  2. %WYLABEL Y-axis label.
  3. %   WYLABEL('text') adds text beside the Y-axis on the current axis.
  4. %
  5. %   WYLABEL('text','Property1',PropertyValue1,'Property2',PropertyValue2,...)
  6. %   sets the values of the specified properties of the ylabel.
  7. %
  8. %   H = WYLABEL(...) returns the handle to the text object used
  9. %   as the label.
  10. %
  11. %   See also WXLABEL, WTITLE, XLABEL, YLABEL, ZLABEL, TITLE, TEXT.
  12. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 01-Oct-97.
  13. %   Last Revision: 01-May-1998.
  14. %   Copyright 1995-2002 The MathWorks, Inc.
  15. %   $Revision: 1.9 $
  16. nbin = nargin;
  17. if nbin>1
  18.     for k=1:2:nbin-1
  19.         p = deblank(lower(varargin{k}));
  20.         if isequal(p,'parent')
  21.             ax = varargin{k+1};
  22.             varargin(k:k+1) = [];
  23.             break
  24.         end
  25.     end
  26. end
  27. if isempty(ax) , ax = gca; end
  28. h = get(ax,'ylabel');
  29. if nargin > 1 & (nargin-1)/2-fix((nargin-1)/2),
  30.   error('Incorrect number of input arguments')
  31. end
  32. %Over-ride text objects default font attributes with
  33. %the Axes' default font attributes.
  34. set(h, 'FontAngle',  get(ax, 'FontAngle'), ...
  35.         'FontName',   get(ax, 'FontName'), ...
  36.         'FontSize',   get(ax, 'FontSize'), ...
  37.         'FontWeight', get(ax, 'FontWeight'), ...
  38.         'string',     string, varargin{:});
  39. if nargout > 0
  40.   hh = h;
  41. end