F_matlab 实现图像边缘的傅里叶描述子

实现图像边缘的傅里叶描述子，可用于边缘检测，形状分析。

function [new_indeces]=find_close_indeces（im_in）

[rc]=find（im_in）;

p=pdist（[r c]）;
psqr=squareform（p）;

 nl=length（r）;
 
new_indeces=[r（1） c（1）];
ind_ind_data=1;
lenindata=1;
newind=1;
 for ind=2:nl
  
    mcur_dist=psqr（newind:）;
    [dist_mindist_min_ind]=sort（mcur_dist）;
    [dmin inddmin]=setdiff（ dist_min_indind_ind_data）;
    dist_min_ind =  dist_min_ind（sort（inddmin））;
    newind=dist_min_ind（1）;
    new_indeces  =[new_indeces; [r（newind） c（newind）]];
    
     ind_ind_data=[ind_ind_data; newind];
    lenindata=length（ind_ind_data）;
    
 end
 

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

     文件        595  2010-02-27 13:01  fourier\find_close_indeces.m

     文件       1245  2010-06-29 22:42  fourier\make_fft_sec.m

     文件        124  2010-06-30 16:34  fourier\readme.txt

     文件        335  2010-06-30 00:13  fourier\test.m

     文件       1467  2010-06-30 16:20  fourier\test_fourier.m

     文件     983094  2008-04-24 12:26  fourier\tron.bmp

     目录          0  2010-07-19 10:07  fourier

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

               986860                    7