Mercurial > hg > smallbox
diff util/SMALL_swipe.m @ 24:fc395272d53e
(none)
author | idamnjanovic |
---|---|
date | Tue, 27 Apr 2010 13:33:00 +0000 |
parents | 33850553b702 |
children | 8e660fd14774 |
line wrap: on
line diff
--- a/util/SMALL_swipe.m Tue Apr 27 13:32:46 2010 +0000 +++ b/util/SMALL_swipe.m Tue Apr 27 13:33:00 2010 +0000 @@ -1,13 +1,22 @@ function [p,s] = SMALL_swipe(X,fs, f, plim,dlog2p,dERBs,woverlap,sTHR) % -% Ivan Damnjanovic 2010 % -% This is modified swipep MATLAB code that is working directly in spectral -% domain and uses only one window size. The results are suboptimal -% comparing to original code. It is also converted to SWIPE which uses all -% the harmonics of the signal. +% Centre for Digital Music, Queen Mary, University of London. +% This file copyright 2009 Ivan Damnjanovic. % -%SWIPEP Pitch estimation using SWIPE'. +% This program is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License as +% published by the Free Software Foundation; either version 2 of the +% License, or (at your option) any later version. See the file +% COPYING included with this distribution for more information. +% +% +% This is modified swipep MATLAB code that is working directly in spectral +% domain and uses only one window size. The results are suboptimal +% comparing to original code. It is also converted to SWIPE which uses all +% the harmonics of the signal. +% +% SWIPEP Pitch estimation using SWIPE'. % P = SWIPEP(X,Fs,[PMIN PMAX],DT,DLOG2P,DERBS,STHR) estimates the pitch % of the vector signal X every DT seconds. The sampling frequency of % the signal is Fs (in Hertz). The spectrum is computed using a Hann @@ -60,6 +69,7 @@ % REFERENCES: Camacho, A., Harris, J.G, (2008) "A sawtooth waveform % inspired pitch estimator for speech and music," J. Acoust. Soc. Am. % 124, 1638-1652. + if ~ exist( 'plim', 'var' ) || isempty(plim), plim = [30 5000]; end %if ~ exist( 'dt', 'var' ) || isempty(dt), dt = 0.001; end if ~ exist( 'dlog2p', 'var' ) || isempty(dlog2p), dlog2p = 1/48; end