二值图像的轮廓提取以及跟踪算法

适用于刚学图像处理的人群，二值图像的应用，以及相关使用方法。

%AUTHOR : RAJJAN SINGH THAKUR （VIT UNIVERSITY）
%DATE :14/2/09

%FUNCTION TO GET CONTOUR PIXELS OF A BINARY IMAGE


%INPUT PARAMETERS ARE BINARY IMAGE AND A ROW AND COL NO OF
%ANY 1 PIXEL ON THE CONTOUTR
%

%OUTPUT PARAMETERS ARE:
%1.KNEW:  CONTOUR IMAGE OF THE GIVEN BINARY IMAGE
%2.M:  [1x2] VECTOR CONTAINING X AND Y COORDINATES OF CONTOUR BACKGROUND PIXELS
%3.N:  [1X2] VECTOR CONTAINING X AND Y COORDINATES OF CONTOUR object PIXELS

function [knewmn] = contour_b（arowcol）
i=row;
j=col;
loop=0;
count=0;
counto=0;
k=zeros（size（a1）size（a2））;
i=row;
j= col;
%counto（1:）=[rowcol];
b=[1 2
    4 3];
z=1;
while（z）
    if （a（ij）==1）
        counto=counto+1;
        n（counto:）=[ij]; 
        b=rot90（b）;
        d= b（11）;
        switch（d）
        case 1
            i=i;
            j=j+1;
            %n（counto:）=[ij]; 
            
            %k（ij）=255;
            
        case 2
            i=i-1;
            j=j;
            %n（counto:）=[ij]; 
            %k（ij）=255;
            
        case 3
            i=i;
            j=j-1;
            %n（counto:）=[ij]; 
            %k（ij）=255;
            
        case 4
            i=i+1;
            j=j;
            %n（counto:）=[ij]; 
            %k（ij）=255;
        otherwise
            []
        end
        
    else
        k（ij）=255;
        count=count+1;
        m（count:）=[i j];
        b=rot90（b-1）;
        d=b（11）;
        %UNCOMMENT IMSHOW COMMAND IF U R USING MATLAB 6.5 TO SEE HOW REGION IS GROWING
        %imshow（k）
        switch（d）
        case 1
            i=i;
            j=j+1;
            %k（ij）=255;
            %m（count:）=[i j];
            %imshow（k）
            
            
        case 2
            i=i-1;
            j=j;
            %k（ij）=255;
            %m（count:）=[i j];
            %imshow（k）
            
        case 3
            i=i;
            j=j-1;
            %k（ij）=255;
            %m（count:）=[i j];
            %imshow（k）
            
        case 4
            i=i+1;
            j=j;
            %k（ij）=255;
            %m（count:）=[i j];
            %mshow（k）
            
        otherwise
            []
        end
    end
    
    if （i==row & j==col & d==1）
        z=0;
    end
end
knew=mat2gray（k）;
imshow（knew）
title（‘contour of given image （mixed neihbourhood）‘）;
figureimshow（a）

%[xnyn]=find（k）;
% knew2=eightneighbour（knewn）;
% knew3=mat2gray（knew2）
% figureimshow（knew3）
% title（‘contour image with eight neighbourhood‘）

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      11546  2010-05-21 11:28  二值图像的轮廓跟踪\1.jpg

     文件       8567  2010-05-21 11:28  二值图像的轮廓跟踪\2.jpg

     文件      20350  2010-05-21 11:28  二值图像的轮廓跟踪\3.jpg

     文件      10552  2010-05-21 11:28  二值图像的轮廓跟踪\4.jpg

     文件      10896  2010-05-21 11:29  二值图像的轮廓跟踪\5.jpg

     文件      20154  2010-05-21 11:29  二值图像的轮廓跟踪\6.jpg

     文件      19953  2010-05-21 11:29  二值图像的轮廓跟踪\7.jpg

     文件       5320  2006-06-08 15:25  二值图像的轮廓跟踪\apple-12.JPG

     文件       2617  2009-02-24 01:24  二值图像的轮廓跟踪\contour_b_trial_2.m

     文件       1820  2009-02-24 01:22  二值图像的轮廓跟踪\contour_code_2.m

     文件       1272  2009-02-24 01:30  二值图像的轮廓跟踪\eightneighbour.m

     文件       1268  2009-02-24 01:37  二值图像的轮廓跟踪\fourneighbour2.m

     文件       1695  2010-05-21 11:26  二值图像的轮廓跟踪\labassign2scrpito.m

     文件       1132  2009-02-24 01:23  二值图像的轮廓跟踪\plot_contour_code.m

     目录          0  2016-02-27 17:14  二值图像的轮廓跟踪

----------- ---------  ---------- -----  ----

               117142                    15