egfold.m

来自「数字信号处理—基于计算机的方法教材上的所有例题源程序」· M 代码 · 共 12 行

[x,n]  = stepseq(0,-5,5);
[w,m]  = sigfold(x,n);
[y,q]  = sigshift(x,n,3);
[v,k]  = sigfold(y,q);
subplot(221),stem(n,x);
xlim([-8,8]);xlabel('n');ylabel('x'); 
subplot(223),stem(m,w);
xlim([-8,8]);xlabel('m');ylabel('w'); 
subplot(222),stem(q,y);
xlim([-8,8]);xlabel('q');ylabel('y'); 
subplot(224),stem(k,v);
xlim([-8,8]);xlabel('k');ylabel('v');