u_chb1ap.m

来自「数字信号处理的MATLAB仿真加实验指导」· M 代码 · 共 13 行

function[b,a]=u_chb1ap(N,Ap,OmegaC);
[z,p,k]=cheb1ap(N,Ap);
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;