view _misc/featureextraction/.svn/text-base/synchronisechroma.m.svn-base @ 9:4ea6619cb3f5 tip

removed log files
author matthiasm
date Fri, 11 Apr 2014 15:55:11 +0100
parents b5b38998ef3b
children
line wrap: on
line source
function bc = synchronisechroma(chromag, beats, frame_t)

% assigning beats to frames
nBeat = size(beats,1);
nFrame = size(chromag, 2);

bc = ones(nBeat,size(chromag,1));
chromag(:,isnan(sum(chromag))) = 1;

if size(beats,2) < 2
    for iBeat = 1:nBeat-1
        currind = find(frame_t >= beats(iBeat) & frame_t < beats(iBeat+1));
        bc(iBeat,:) = median(chromag(:,currind),2);
        if ~any(isnan(bc(iBeat,:)))
            bc(iBeat,:) = bc(iBeat,:)/max(bc(iBeat,:));
        end
    end
else
    for iBeat = 1:nBeat
        currind = (frame_t >= beats(iBeat,1) & frame_t < beats(iBeat,2));
        bc(iBeat,:) = median(chromag(:,currind),2);
        if ~any(isnan(bc(iBeat,:)))
            bc(iBeat,:) = bc(iBeat,:)/max(bc(iBeat,:));
        end
    end
end