SSR 实现单尺度retinex算法

实现单尺度retinex算法，用于图像的对比度增强，对低能见度图像处理效果较好。

function SSR=Single_Scale（SHSIZESIGMA）

[mn]=size（S）;
s=m*n;
mean=sum（sum（S）2）/s;
R=zeros（mn）;
R=repmat（meanmn）;


 H = fspecial（‘gaussian‘HSIZESIGMA）;
 G=imfilter（S H ‘conv‘ ‘symmetric‘）;
%figureimshow（uint8（G））;

SS=zeros（mn）;
for i=1:m
   for j=1:n
       if S（ij）>0
        SS（ij）=log（S（ij））;
        GG（ij）=log（G（ij））;
        V（ij）= SS（ij）-GG（ij）;
       end
   end
end
%figure imshow（V）;

Min=min（min（V））;
Max=max（max（V））;
for i=1:m
   for j=1:n
      VV（ij）=（V（ij）-Min）*255/（Max-Min）;
   end
end
VVV=uint8（VV）;
%figure imshow（V）;
SSR=VVV
%figure imshow（SSR）;

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

     文件        625  2011-04-12 19:34  20101022SSR\Single_Scale.asv

     文件        628  2011-06-03 14:18  20101022SSR\Single_Scale.m

     文件        487  2010-10-25 09:03  20101022SSR\SSR.asv

     文件        517  2011-06-17 16:03  20101022SSR\SSR.m

     目录          0  2011-07-30 09:54  20101022SSR

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

                 2257                    5