%Lp2bs函數：模擬低通濾波器到模擬帶阻濾波的轉換
[z,p,k]=buttap(3);
[b,a]=zp2tf(z,p,k);
[bt,at]=lp2bs(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),semilogx(wh,abs(hh));