sobellena.m
上传用户:jiaji168
上传日期:2016-05-12
资源大小:816k
文件大小:1k
源码类别:

图形图像处理

开发平台:

Matlab

  1. I=imread('lena.bmp');
  2. I=im2double(I);
  3. figure;
  4. imshow(I);title('org img');
  5. [height width R]=size(I);
  6. %Dx=[-1 -2 -1
  7.     %0   0  0
  8.     %1   2  1];
  9. %Dy=[-1 0 1
  10.     %-2 0 2 
  11.     %-1 0 1];
  12. for i=2:height-1
  13.     for j=2:width-1
  14.         Dx=[I(i+1,j-1)-I(i-1,j-1)]+2*[I(i+1,j)-I(i-1,j)]+[I(i+1,j+1)-I(i-1,j+1)];
  15.         Dy=[I(i-1,j+1)-I(i-1,j-1)]+2*[I(i,j+1)-I(i,j-1)]+[I(i+1,j+1)-I(i+1,j-1)];
  16.        S(i,j)=sqrt(Dx^2+Dy^2);
  17.      
  18.     end
  19. end
  20. figure;
  21. imshow(S);
  22. for i=1:255
  23.     for j=1:255
  24.        if (S(i,j)<1)
  25.             S(i,j)=1;
  26.         else S(i,j)=0;
  27.         end
  28.     end
  29. end
  30. figure;
  31. imshow(S,[]);