⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 autocontrast.htm

📁 matlab图象增强代码集合。多个代码。英文。
💻 HTM
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312"></HEAD>
<BODY><PRE>% AUTOCONTRAST  Automatically adjusts the contrast of images to the optimum level.

function autocontrast
warning off

%--------------------------------------------------------------------------
[FileName,PathName] = uigetfile('*.jpg','Select any image');
y= [PathName,FileName];
img=imread(y);
[m1 n1 r1]=size(img);
img2=double(img);
%--------------------calculation of vmin and vmax--------------------------
for(k=1:r1)
arr=sort(reshape(img2(:,:,k),m1*n1,1));
vmin(k)=arr(ceil(0.008*m1*n1));
vmax(k)=arr(ceil(0.992*m1*n1));
end
%--------------------------------------------------------------------------
if(r1==3)
    v_min=rgb2ntsc(vmin);
    v_max=rgb2ntsc(vmax);
end
if(r1==1)
    v_min=vmin;
    v_max=vmax;
end   
%--------------------------------------------------------------------------
for(i=1:m1)
     for(j=1:n1)
         for(k=1:r1)
                img2(i,j,k)=255*(img2(i,j,k)-v_min(1))/(v_max(1)-v_min(1));
         end
     end
end
%--------------------------------------------------------------------------
img2=uint8(img2);
%--------------------------------------------------------------------------
[FileName,PathName] = uiputfile('*.jpg','Give any name to the enhanced image');
FileName=[FileName '.jpg'];
y=[PathName,FileName];
imwrite(img2,y);
figure,imshow(img),title('THIS IS THE ORIGINAL IMAGE');
figure,imshow(img2),title('THIS IS THE ENHANCED IMAGE');
%--------------------------------------------------------------------------</PRE></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -