Code covered by the BSD License

# MIRtoolbox

### Olivier Lartillot (view profile)

29 Jun 2009 (Updated )

An innovative environment, on top of Matlab, for music and audio analysis

combinepeaks(p,v,thr)
```function c = combinepeaks(p,v,thr)
% dedicated function for (Klapuri, 99) that creates a curve made of burst
% at position of peaks p and with amplitude related to peaks v.

dp = get(p,'Data');
dv = get(v,'Data');
pp = get(p,'PeakPos');
pv = get(v,'PeakPos');
sr = get(v,'Sampling');
l = length(dp);
empty = cell(1,l);
for i = 1:l
thr = round(thr*sr{i});
empty{i} = cell(1,length(dp{i}));
for h = 1:length(dp{i})
dih = zeros(size(dp{i}{h}));
for l = 1:size(pp{i}{h},3)
for k = 1:size(pp{i}{h},2)
j = 1;
ppkl = pp{i}{h}{1,k,l};
pvkl = pv{i}{h}{1,k,l};
while j < length(ppkl)
if ppkl(j+1)-ppkl(j) < thr
decreas = dv{i}{h}(pvkl(j+1),k,l) ...
< dv{i}{h}(pvkl(j),k,l);
ppkl(j+decreas) = [];
pvkl(j+decreas) = [];
else
j = j+1;
end
end
dih(ppkl,k,l) = dv{i}{h}(pvkl,k,l);
end
end
dv{i}{h} = dih;
end
end
c = set(p,'Data',dv,'PeakPos',empty,'PeakVal',empty,...
'PeakPrecisePos',{},'PeakPreciseVal',{},'PeakMode',empty,...
'InterChunk',[]);```