function X=fourier2(x,N)
% Calcula a N pontos da transformada de fourier de uma sequencia (vetor x)
% implementado com 1 loop 'for' 
% UFPR/DELT - Disciplina PDS - Prof. Eduardo Parente Ribeiro

X=zeros(1,N);
L=length(x);
for k=0:(N-1)
   w= -j*2*pi/N*k;
   X(k+1)=sum(x .* exp(w .* (0:(L-1)) ) );
   end