腐蚀膨胀和边缘提取

gaohaikuo1

%读取图片并显示
I = imread('lena.jpg');
subplot(3,3,1);imshow(I);title('raw')
%灰度化并显示
I_gray = rgb2gray(I);
subplot(3,3,2);imshow(I_gray);title('gray')
%二值化并显示
I_bw = I_gray>150;
subplot(3,3,3);imshow(I_bw);title('bw')
%提取边缘
I_edge = abs(I_gray(:,1:end-1)-I_gray(:,2:end))>20;
subplot(3,3,4);imshow(I_edge,[]);title('edge');
I_edge1 = imfilter(I_gray,ones(25,25)/625);
subplot(3,3,5);imshow(I_edge1,[]);title('edge1');
I_edge2 = imdilate(I_edge,ones(3,3));
subplot(3,3,6);imshow(I_edge2,[]);title('edge2');
I_edge3 = imerode(I_edge2,ones(3,3));
subplot(3,3,7);imshow(I_edge3,[]);title('edge3');