Mercurial > hg > adaptinstrspec
annotate 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 |
rev | line source |
---|---|
holger@0 | 1 function X = idceps(c, w) |
holger@0 | 2 % X = idceps(c, w) |
holger@0 | 3 % |
holger@0 | 4 % computes the inverse discrete cepstrum, i.e. given a number of discrete |
holger@0 | 5 % cepstral coefficients, it returns the spectrum. |
holger@0 | 6 % |
holger@0 | 7 % c contains the discrete cepstral coefficients |
holger@0 | 8 % w contains the frequency at which the spectrum is evaluated. |
holger@0 | 9 % c and w must be column vectors. |
holger@0 | 10 % |
holger@0 | 11 % Further details can be found in: |
holger@0 | 12 % [1] Diemo Schwarz. Spectral envelopes in sound analysis and synthesis. |
holger@0 | 13 % Master's thesis, Universitaet Stuttgart, 1998, pp. 36-38. |
holger@0 | 14 % [2] T. Galas and X. Rodet. An improved cepstral method for deconvolution |
holger@0 | 15 % of source filter systems with discrete spectra: Application to musical |
holger@0 | 16 % sound signals. In International Computer Music Conference, 1990. |
holger@0 | 17 |
holger@0 | 18 pmax = length(c)-1; |
holger@0 | 19 numW = length(w); |
holger@0 | 20 |
holger@0 | 21 exponent = sum( repmat(c', numW, 1) .* cos(w*(0:pmax)), 2 ); |
holger@0 | 22 X = exp(exponent); |