Mercurial > hg > pmhd

view extra/genspecsines_sin.m @ 13:844d341cf643 tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Back up before ISMIR
author Yading Song <yading.song@eecs.qmul.ac.uk>
date Thu, 31 Oct 2013 13:17:06 +0000
parents 6840f77b83aa
children
line wrap: on
line source
function Y = genspecsines_sin(ploc, pmag, pphase, N)
y=zeros(N,1);
w=blackmanharris(N);
w=w./sum(w);
w(2:N)=w(2:N)*2;
for k=1:length(ploc)
f=ploc(k)/N;
A=10ˆ(pmag(k)/20);
phi=pphase(k);
n=[0:1:N-1]';
y=A*cos(2*pi*f.*n+phi)+y;
end
y=y.*w;
Y=abs(fft(y));