%Estudio de una señal estacionaria con contenido de 10,25,50 y 100 Hz
%y su respectivo espectro de frecuencia

clear all
close all

npuntos=512;
t=0:1/npuntos:1;
w=2*pi;
tiempo=1000*t;
x=cos(w*10*t)+cos(w*25*t)+cos(w*50*t)+cos(w*100*t);
figure(3)
plot(tiempo,x)
xlabel('Tiempo [ms]');
title('Señal estacionaria con contenido de 10, 25, 50 y 100 Hz');
grid on
ft=fft(x);
figure(4)
subplot(2,1,1)
plot(abs(ft))
xlabel('Frecuencia [Hz]');
title('Espectro de frecuencias de la señal de 10,25,50 y 100 Hz estacionaria','fontweight','bold');
axis([0,npuntos,0,600]);
grid on
subplot(2,1,2)
plot(abs(ft))
xlabel('Frecuencia [Hz]');
axis([0,npuntos/8,0,600]);
grid on

