%Lp2bp函數：模擬低通濾波器到模擬帶通濾波器的轉換
[z,p,k]=buttap(3);
[b,a]=zp2tf(z,p,k);
[bt,at]=lp2bp(b,a,500*2*pi,400*2*pi);
[hl,wl]=freqs(b,a);
[hh,wh]=freqs(bt,at);
subplot(2,1,1),semilogx(wl,abs(hl));grid;
subplot(2,1,2),plot(wh,abs(hh));