point.m

%找出细化后图像的所有端点
%将一个点的八个邻域依次两两相减并取绝对值，并将所有结果相加，从细化图像的特征来说
%和为2时为端点 和为6时为交叉点
function txy=point(thin)
count=1;
txy(count,:)=[0,0,0];
%取行数和列数的最小值
siz=min(size(thin,1),size(thin,2))
for x=40:siz-40
    for y=40:siz-40
        if(thin(y,x))
            CN=0;
            for i=1:8
                CN=CN+abs(p(thin,y,x,i)-p(thin,y,x,i+1));
            end
            if (CN==2)%和为2时为端点 和为6时为交叉点
                txy(count,:)=[x,y,2];
                count=count+1;
            end
            if(CN==6)%和为2时为端点 和为6时为交叉点
                txy(count,:)=[x,y,6];
                count=count+1;
            end
        end
    end
end

for i=1:count-1
    x(i)=txy(i,1);
    y(i)=txy(i,2);
end
imshow(double(thin));
% hold on 通知后面将要绘图
hold on;
plot(x,y,'.');