r.asv

来自「给出了数字信号处理课程设计的基本程序」· ASV 代码 · 共 11 行

function z=R(A)
N=length(A)
z=[1,2*N-1]
for m=-(N-1):(N-1)
        x=A([1:(N-abs(m))])
        y=A([(1+abs(m)):N])
        z(abs(m)+N)=x*y'
    end
    
stem([-(N-1):(N-1)],z)