Mercurial > hg > adaptinstrspec
diff functions/idceps.m @ 0:b4e26b53072f tip
Initial commit.
author | Holger Kirchhoff <holger.kirchhoff@eecs.qmul.ac.uk> |
---|---|
date | Tue, 04 Dec 2012 13:57:15 +0000 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/functions/idceps.m Tue Dec 04 13:57:15 2012 +0000 @@ -0,0 +1,22 @@ +function X = idceps(c, w) +% X = idceps(c, w) +% +% computes the inverse discrete cepstrum, i.e. given a number of discrete +% cepstral coefficients, it returns the spectrum. +% +% c contains the discrete cepstral coefficients +% w contains the frequency at which the spectrum is evaluated. +% c and w must be column vectors. +% +% Further details can be found in: +% [1] Diemo Schwarz. Spectral envelopes in sound analysis and synthesis. +% Master's thesis, Universitaet Stuttgart, 1998, pp. 36-38. +% [2] T. Galas and X. Rodet. An improved cepstral method for deconvolution +% of source filter systems with discrete spectra: Application to musical +% sound signals. In International Computer Music Conference, 1990. + +pmax = length(c)-1; +numW = length(w); + +exponent = sum( repmat(c', numW, 1) .* cos(w*(0:pmax)), 2 ); +X = exp(exponent); \ No newline at end of file