MATLAB设计的简单滤波器程序源代码.zip

function mainfun() Wp=0.2*pi; Ws=0.4*pi; tr_width=Ws-Wp; %过渡带宽度 N=ceil(6.6*pi/tr_width)+1 %滤波器长度 n=0:1:N-1; Wc=(Ws+Wp)/2; %理想低通滤波器的截至频率 hd=ideal_lp(Wc,N)'; %理想低通滤波器的单位冲激响应 w_ham=(hamming(N)) %海明窗 h=hd.*w_ham; %截取得到实际的单位脉冲响应 [db,mag,pha,w]=freqz_m4(h,[1]); %计算实际滤波器的幅度响应 delta_w=2*pi/1000; Ap=-(min(db(1:1:Wp/delta_w+1))) %实际通带纹波 As=-round(max(db(Ws/delta_w+1:1:501))) %实际阻带纹波 subplot(221) stem(n,hd) %火柴棍图 title('理想单位脉冲响应hd(n)') subplot(222) stem(n,w_ham) title('海明窗w(n)') subplot(223) stem(n,h) title('实际单位脉冲响应h(n)') subplot(224) plot(w/pi,db) title('幅度响应(dB)') axis([0,1,-100,10]) msgbox('MATLAB编程答疑，请加QQ: 993878382','MATLAB答疑','help') web http://993878382.qzone.qq.com -browser end %本程序用到的自定义函数 function hd=ideal_lp(Wc,N) alpha= (N-1)/2; n=0:1:N-1; m=n-alpha+eps; hd=sin (Wc*m)./(pi*m); end function[db,mag,pha,w]=freqz_m4(b,a) [H,w]=freqz(b,a,1000,'whole'); H=(H(1:1:501)); w=(w(1:1:501)); mag=abs(H); db=20*log10((mag+eps)/max(mag)); pha=angle(H); end