figim.m

基于＂trace transform＂的识别２Ｄ图像的Ｃ＋＋源程序

function figim(im,range)% range can be also the title ('im' goes to the title as well)
compl=0; if ~isreal(im), im=abs(im); compl=1; end
C=0;
if ndims(im)==3, C=1; end

if nargin==2
  if isnumeric(range) & length(range)>1 % in the range
     figure;  if ~C, imagesc(im,range);else image(uint8(im));end;
 elseif isnumeric(range) & length(range)==1 %fig No.=range
 if ~C, figure(range);clf;  imagesc(im);else figure(range);clf; image(uint8(im));end; range='';
 else figure; if ~C, imagesc(im);else  image(uint8(im));end
 end 
end% if nargin==2

if nargin==1
figure;if ~C, imagesc(im);else  image(uint8(im));end
end 


ttl=inputname(1);
if nargin>1, ttl=[ ttl ' : ' num2str(range) ]; end
if compl, ttl=[ ttl '   abs of complex!' ]; end
title(ttl);

if ~C, colorbar, end 

axis image;pixval