u_chb1ap.m

来自「原名：数字信号处理基础及MATLAB实现,解压缩密码：lfjk2002@163.」· M 代码 · 共 14 行

function [b,a]=u_chb1ap(N,Rp,Omegac);
%未归一化切比雪夫Ι型模拟低通滤波器
%b分子多项式系数；a分母多项式系数；
%N为阶数；Rp为通带波动，Rp>0；Omegac截止频率，单位为弧度秒
[z,p,k]=cheb1ap(N,Rp);
a=real(poly(p));
aNn=a(N+1);
p=p*Omegac;
a=real(poly(p));
aNu=a(N+1);
k=k*aNu/aNn;
b0=k;
B=real(poly(z));
b=k*B;