.


:




:

































 

 

 

 





. , , . , .

, , . , , . , .

, .

. - , , - . , -

, (1)

- .

(1) , , . , , . .

, (2)

- , k= 0,8 - . (2) - . (2) . , (2).

, , (2).

.

. , (2):

. (3)

.

, , . , .

%, % clear;% L=imread('lena.tif');L=double(L);L=L(:,:,1)./255; % , L(:,:,1)=L(:,:,2)=L(:,:,3) [N M]=size(L);m=5;n=m;n1=fix(n/2);m1=fix(m/2); % Lmax=max(L(:));Lmin=min(L(:));H=imhist(L,256);figure, imshow(L);% % a=L(1,1);b=L(1,M);c=L(N,1);d=L(N,M);for i=1:n1;for j=1:m1; L1(i,j)=a; L3(i,j)=b; L6(i,j)=c; L8(i,j)=d;end;end; L2=L(1,1:M); L02=L2; for i=1:n1-1; L2=[L2;L02]; end; L7=L(N,1:M); L07=L7; for i=1:n1-1; L7=[L7;L07]; end; L4=L(1:N,1); L4=L4'; L04=L4; for i=1:m1-1; L4=[L4;L04]; end;L4=L4'; L5=L(1:N,M); L5=L5'; L05=L5; for i=1:m1-1; L5=[L5;L05]; end; L5=L5'; L1=[L1;L4]; L1=[L1;L6]; L1=L1'; L2=[L2;L]; L2=[L2;L7]; L2=L2'; L3=[L3;L5]; L3=[L3;L8]; L3=L3'; L1=[L1;L2]; L1=[L1;L3]; L1=L1';clear L2;clear L3;clear L4;clear L5;clear L6;clear L7;clear L8;clear L02; clear L04;clear L05;clear L07;clear L;F=ones(n,m);Lser=filter2(F,L1,'same')/(n*m);alfa=1;P=3; % for i=n1+1:n1+N;disp(i);for j=m1+1:m1+M; if j==1+m1; D=0; for a=-n1:n1; for b=-m1:m1; D(n1+1+a,m1+1+b)=(Lser(i+a,j+b)-L1(i+a,j+b))^2*H(round(255*L1(i,j))+1); end; end; end; if j>1+m1; for a=-n1:n1; D(n1+1+a,m+1)=(Lser(i+a,j+m1)-L1(i+a,j+m1))^2*H(round(255*L1(i,j))+1); end; D=D(1:n,2:m+1); end; Dyspers(i,j)=(1/(n*m))*sum(sum(D)); C(i,j)=1-1/(Dyspers(i,j)/P+1); C(i,j)=C(i,j)^.67;suma(i,j)=sum(sum(D))-D(n1+1,m1+1);DRD(i,j)=sqrt(n*m*C(i,j)/(1-C(i,j)+eps)-suma(i,j));if L1(i,j)>=Lser(i,j);Lvyh(i,j)=Lser(i,j)+alfa*DRD(i,j);elseLvyh(i,j)=Lser(i,j)-alfa*DRD(i,j);end;if Lvyh(i,j)>1; Lvyh(i,j)=1;end;if Lvyh(i,j)<0; Lvyh(i,j)=0;end;end;end;Lvyh=Lvyh(1+n1:n1+N,1+m1:m1+M);figure, imshow(abs(Lvyh)); %
)
) ),
) ),

. 1. ()) ()) ( - ).

:

. , , , : , , . ( ), ( ).

, , . .

" " . .

" " , - , . . "" , . , - , , . , "" . "" , , , .

, . . .





:


: 2015-10-01; !; : 633 |


:

:

, .
==> ...

1769 - | 1587 -


© 2015-2024 lektsii.org - -

: 0.012 .