view dsp/cepstrum.m @ 58:ba866ae124c6

Now accepts single color index for all points.

% cepstrum - generalised  cepstral coefficients from warped power spectrogram
%
% cepstrum ::
%    [[M]->[K]] ~'which coefficients to compute',
%    [[K]]      ~'edges for (K-2)-band filterbank',
%    [[N]]      ~'centre frequencies of spectrum bins',
%    [[N,T]]    ~'input spectra',
% -> [[M,T]]    ~'MFCCs for L time slices'.
function y = cepstrum(MX,edges,fx,x)
	melW = tri_filterbank(edges,fx);
	dctW = dct(eye(size(melW,1)));
	y = dctW(MX,:)*log(melW*x);
end