%FILTRO DE PONDERACIÓN. %function x=ponder(e) %Entradas: %e:excitación residual. %Salidas: %x:salida filtrada. function x=ponder(e) H=[-134 -374 0 2054 5741 8192 5741 2054 0 -374 -134]/8192; %coeficientes del filtro. eaux=[zeros(1,5),e,zeros(1,5)]; for k=7:46 acum=zeros(1,11); for i=1:11 acum(i)=H(i)*eaux(k+5-i); end xaux(k)=sum(acum); end x=xaux(7:46);