www.gusucode.com > matlab通信工程仿真源码（张德丰等编著）程序书籍 > matlab_code/matlab通信工程仿真源码（张德丰等编著）/第2章/li2_36.m

    b=[5 3 -2 7];
a=[-4 0 8 3];
[r,p,k]=residue(b,a)
[b,a]=residue(r,p,k)