SHARE
TWEET

Untitled

a guest Nov 19th, 2019 79 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. %%%%% Práctica 2
  2.  
  3.  
  4. close all,
  5. % Ejercicio 1
  6. load ecg_red.mat
  7. figure, plot (ecg)
  8. Fm=1000; %Frecuencia de muestreo
  9. fe=50; %Eliminar frecuencia de 50 Hz
  10. N=Fm/fe;
  11. k=1:N-1;
  12. f_eliminadas=Fm/N*k;
  13. %espectro(ecg, Fm)
  14. B=1/N*ones (1,N);
  15. A=1;
  16. y=filter (B,A,ecg);
  17. hold on, plot(y, 'r'), legend ('ECG', 'Filtrada')
  18.  
  19. %Diagrama de ceros y polos
  20. figure, zplane(B,A)
  21.  
  22. %Respuesta en frecuencia en modulo y fase
  23. figure, freqz (B,A)
  24.  
  25. espectro(y, Fm)
  26.  
  27. %%%%%%% Ejercicio 2 %%%%%%%%%
  28.  
  29. close all, clear
  30. x=load('milk.dat');
  31. figure, plot(x)
  32.  
  33. %Promediador anual
  34. N=12;
  35. B=1/N*ones(1,N);
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top