%% Script simples para gerar uma figura do espectro de fourier

A = randn(1,15);
B = randn(1,15);
subplot(2,1,1); stem(A); title('Espectro de Magnitude'); xlabel('Frequência angular [x \Omega_0]'); ylabel('|D_r|')
subplot(2,1,2); stem(B); title('Espectro de Fase'); xlabel('Frequência angular [x \Omega_0]'); ylabel('\angle D_r')