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