matlab图像光线补偿程序（可运行）

matlab光线补偿图像处理代码 经测试可用 源码 m文件

function LightCompensate（I）


[m0n0l]=size（I）;
figure（1）imshow（I）;     % 显示原图


thresholdco=0.05;        % 比例系数
thresholdnum=100;        % 像素个数的临界常数
histogram=zeros（1256）;  % 灰度级 数组， 直方图（1行，256列）

%if m0*n0*thresholdco < thresholdnum
%    disp（‘输入图像太小，请换一张！‘）;
%    return
%end

gray=0;
index0=0;

for i=1:m0        % 图像扫描
     for j=1:n0
          gray=round（I（ij1）*.299+I（ij2）*.587+I（ij3）*.114）;
          index0=gray+1;
          histogram（1index0）= histogram（1index0）+1;
     end
end
 
 calnum=0;
 total=m0*n0;
 num=0;
 
 %next获得满足系数thresholdco的临界灰度级
 index1=0;
 for i=1:256
     if calnum/total         index1=256-i+1;
         calnum=calnum+histogram（1index1）;
         num=i;
     else
         break;
     end
 end
 
 averagegray=0;
 calnum=0;
 k=256-num+1;
 
 
 % 获得满足条件的像素总的灰度值
 for i=256:-1:k
     averagegray=averagegray+histogram（1i）*i;
     calnum=calnum+histogram（1i）;
 end
 averagegray=averagegray/cal

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       1666  2011-09-09 12:57  新建文件夹\LightCompensate.m

     文件        363  2011-09-09 13:00  新建文件夹\main2.m

     文件     801066  2003-06-28 23:26  新建文件夹\test.jpg

     目录          0  2011-09-13 15:39  新建文件夹

----------- ---------  ---------- -----  ----

               803095                    4