边缘提取边界跟踪法

clear all;
close all;
clc;

img=imread（‘E:\pic\lena.jpg‘）;%读入图像
img=rgb2gray（img）;%彩色图转灰度图
img=img>128;      %二值转换
imshow（img）;
[m n]=size（img）;  %获取图像尺寸

imgn=zeros（mn）;        %边界标记图像
ed=[-1 -1;0 -1;1 -1;1 0;1 1;0 1;-1 1;-1 0]; %从左上角像素判断
for i=2:m-1
    for j=2:n-1
        if img（ij）==1      %如果当前像素是前景像素
            
            for k=1:8