function [kinPerSec]=shiftingKin(kin, window, shift)
    kinPerSec=zeros(fix((max(kin(:,1))-window*1000)/(shift*1000)),3);
    for j=1:fix((max(kin(:,1))-window*1000)/(shift*1000))
        kinPerSec(j,:)=sum(diff(kin(kin(:,1)>=(j-1)*shift*1000 & kin(:,1)<=(j-1)*shift*1000+window*1000,2:4)));
    end
end