iirhighpass.m

matlab的滤波器

fb=5000;fc=4800;fs=10000;
rp=1;rs=100;
wp=2*pi*fb/fs;
ws=2*pi*fc/fs;
wap=tan(wp/2);
was=tan(ws/2);
[n,wn]=buttord(wap,was,rp,rs,'s');
[z,p,k]=buttap(n);
[Bap,Aap]=zp2tf(z,p,k);
[b,a]=lp2hp(Bap,Aap,wn);
[bz,az]=bilinear(b,a,fs/wn);
[x1,fs]=wavread('music');
x2=filter(bz,az,x1);
sound(x2,44100);f=fft(x2,length(x1));
printf(x2,abs(f),abs(length(x1)),bz,az);
[H,W]=freqz(bz,az);
figure(2);
plot(W*fs/(2*pi),abs(H))
grid
xlabel('频率／Hz')
ylabel('频率响应幅度')
title('IIR高通滤波器')