computes the novelty measure used by Hainsworth > called by ::ComputeNoveltyFunction > > @param X: spectrogram (dimension FFTLength X Observations) > @param f_s: sample rate of audio data (unused) > > @retval d_hai novelty measure ======================================================================
0001 %computes the novelty measure used by Hainsworth 0002 %> called by ::ComputeNoveltyFunction 0003 %> 0004 %> @param X: spectrogram (dimension FFTLength X Observations) 0005 %> @param f_s: sample rate of audio data (unused) 0006 %> 0007 %> @retval d_hai novelty measure 0008 % ====================================================================== 0009 function [d_hai] = NoveltyHainsworth (X, f_s) 0010 0011 epsilon = 1e-5; 0012 0013 % difference spectrum 0014 X = [X(:,1), sqrt(X)]; 0015 X(X<=0) = epsilon; 0016 0017 % flux 0018 d_hai = sum(log2(X(:,2:end)./X(:,1:end-1)))/size(X,1); 0019 end