Aplicaciones de Filtros Digitales
>> N=50;n=0:N-1;M=6;Nf=30;nf=Nf/2;
>> x = sin(2*pi*0.042*n) + sin(2*pi*0.033*n);
% Filtro pasobajo frecuencia de corte pi/6 --> 1/12
>> [H,F]=freqz(B,1,250,1);
>> xd(1:N-nf) = xd(nf+1:N);xd(N-nf+1:N)=zeros(1,nf);
% Generar la secuencia de down-sampler
>> y = xd(1:M:N-1);lxd=length(y);
>> figure;plot(n,x,'r',n,xd,'g');
>> figure;stem([1:lxd],y);
>> figure;semilogy(F,abs(H));