时频脊线提取

优化的脊线提取技术，内附例子

function out=local_maxima（abs_coefbwind）

out=zeros（size（abs_coef））;
sub=（bw==ind）.*abs_coef;
[x y]=find（bw==ind）;
st=y（1）;ed=y（end）;
MAX=max（sub）;

for j=1:size（abs_coef2）
    out（:j）=abs_coef（:j）==MAX（j）;
end

if st>1
   for j=1:st-1
      out（:j）=0;
   end
end
if ed   for j=ed+1:size（abs_coef2）
       out（:j）=0;
   end
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件       64044  2006-12-15 10:30  脊线提取\Aa.wav
     文件         374  2009-07-20 11:39  脊线提取\local_maxima.m
     文件         842  2017-01-10 22:41  脊线提取\ridge.m
     目录           0  2017-01-10 22:44  脊线提取\