am_phase.m

来自「关于跳频通信的资料,希望能对大家有所帮助和启发」· M 代码 · 共 21 行

echo on
fnct='lambda';
a=-4;
b=4;
n=24;
tol=0.1;
xx=fseries(fnct,a,b,n,tol);
xx1=xx(n+1:-1:2);
xx1=[conj(xx1),xx];
absxx1=abs(xx1);
pause
n1=[-n:n];
stem(n1,absxx1);
title('the discrete magnitude spectrum')
xlabel('n');
ylabel('abs');

phasexx1=angle(xx1);
pause
stem(n1,phasexx1);
title('the discrete phase spectrum')