การบ้าน I
function RatEdge % ใช้รูปด้านบน หา ขอบของวัตถุโดยการใช้ Dilation
A =imread('Rat.jpg');
Lb = graythresh(A);
BW = rgb2gray(A);
BW = im2bw(BW,Lb);
St = strel('diamond',3);
DiImg = imdilate(BW,St);
SB = DiImg-BW;
imshow(SB);