%--------------------------------------------------------------------------
% Problema 1 - Serie 9: Muestreo de señal no limitada en banda
%--------------------------------------------------------------------------
F=[-5:0.01:5]; % Frecuencias continuas
A=1;
Xa=2*A./(A^2+(2*pi*F).^2); % Espectro de xa(t)
figure
plot(F,Xa)
xlabel('Frecuencia [Hz]')
ylabel('Xa(F)')
f=[-0.5:0.005:0.5];  % Frecuencias discretas
% Probar con valores de Fs=1, Fs=5, Fs=10 , Fs=20
Fs=10;   % Frecuencia de Muestreo
T=1/Fs;  % Periodo de Muestreo
X=(1-exp(-2*A*T))./(1-2*exp(-A*T)*cos(2*pi*f)+exp(-2*A*T)); % Espectro de x(n)=xa(nT)
figure
plot(f/T,X*T)
xlabel('Frecuencia [Hz]')
ylabel('X(F/Fs)')
figure
plot(f/T,X*T,'b',F,Xa,'r')
xlabel('Frecuencia [Hz]')
