Mercurial > hg > smallbox
diff util/SMALL_swipe.m @ 128:8e660fd14774 ivand_dev
Feature 186
author | Ivan Damnjanovic lnx <ivan.damnjanovic@eecs.qmul.ac.uk> |
---|---|
date | Mon, 13 Jun 2011 14:55:45 +0100 |
parents | fc395272d53e |
children |
line wrap: on
line diff
--- a/util/SMALL_swipe.m Wed May 25 15:30:34 2011 +0100 +++ b/util/SMALL_swipe.m Mon Jun 13 14:55:45 2011 +0100 @@ -1,20 +1,12 @@ function [p,s] = SMALL_swipe(X,fs, f, plim,dlog2p,dERBs,woverlap,sTHR) -% -% -% Centre for Digital Music, Queen Mary, University of London. -% This file copyright 2009 Ivan Damnjanovic. -% -% 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. -% -% +%% Modified SWIPEP Pitch estimation using SWIPE'. % 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. +% the harmonics of the signal. + +% +% % % SWIPEP Pitch estimation using SWIPE'. % P = SWIPEP(X,Fs,[PMIN PMAX],DT,DLOG2P,DERBS,STHR) estimates the pitch @@ -70,6 +62,17 @@ % inspired pitch estimator for speech and music," J. Acoust. Soc. Am. % 124, 1638-1652. +% +% Centre for Digital Music, Queen Mary, University of London. +% This file copyright 2009 Ivan Damnjanovic. +% +% 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. +%% + 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