im_invert.m

来自「这是我找到的一个模式识别工具箱」· M 代码 · 共 33 行

%IM_INVERT Inversion of images stored in a dataset
%
% A = IM_INVERT(A)
% A = A*IM_INVERT
%
% Inverts image A by subtracting it from its maximum
%
% SEE ALSO
% DATASETS, DATAFILES

% Copyright: D. de Ridder, R.P.W. Duin, [e-mail]
% Faculty EWI, Delft University of Technology
% P.O. Box 5031, 2600 GA Delft, The Netherlands

function b = im_invert(a)

	prtrace(mfilename);
	
  if nargin < 1 | isempty(a)
    b = mapping(mfilename,'fixed');
    b = setname(b,'Image inverse');
	elseif isa(a,'dataset') % allows datafiles too
		isobjim(a);
    b = filtim(a,mfilename);
  elseif isa(a,'double') | isa(a,'dip_image') % here we have a single image
		if isa(a,'dip_image'), a = double(a); end
		b = max(max(max(a)))-a;
	end
	
return