LightCompensate 光照补偿matlab程序

光照补偿matlab程序，很好很强大，很有效果

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
 
 ave

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

     文件       1666  2011-09-09 12:57  光线补偿\LightCompensate.m

     文件        415  2011-11-16 13:36  光线补偿\main2.m

     文件     801066  2003-06-28 23:26  光线补偿\test.jpg

     文件       7804  2011-11-16 13:16  光线补偿\wbq_1.jpg

     文件       8223  2011-11-16 13:17  光线补偿\wbq_2.jpg

     文件      12940  2011-11-16 13:17  光线补偿\wbq_3.jpg

     目录          0  2011-11-16 13:36  光线补偿

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

               832114                    7