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

图形图像处理

开发平台:

Matlab

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