a2lgc.m
上传用户:shjsjz
上传日期:2022-07-09
资源大小:3k
文件大小:1k
- function [sn,lgc]=a2lgc(a,lv)
- %得到区块,每帧10ms,模糊长度超过l*10ms,总长超过ll*10ms,能量超过lv的区块
- %sn列表区块[起始偏移量,帧数,最大值],lst帧列表,lgc列表向量
- s=10; %ms
- l=3; %模糊长度
- ll=8; %总长度
- %lv=0.05; %能量超过lv
- sn=[]; %区块列表
- for l=l:-1:0
-
- lb=l+l+1;
- lgc=a>lv;
- lgc=d_lo0(lgc,lb);
- lgc=lgc>0.5;
- st=0;
- for i=1:size(a,1)
- if lgc(i)>0 & st==0
- st=i;
- end
- if lgc(i)==0 & st>0
- k=i-st;
- mx=max(a(st:i-1));
- sn=[sn;st-1,k,mx];
- st=0;
- end
- if lgc(i)>0 & i==size(a,1) & st>0
- k=i-st+1;
- mx=max(a(st:i));
- sn=[sn;st-1,k,mx];
- st=0;
- end
- end
- if ~isempty(sn)
- break;
- end
- end
- [p,q]=sort(sn(:,3));
- sn=sn([q(end:-1:1)],:);