实验参考程序.docVIP

实验一参考程序： 1 产生10点的单位抽样序列δ(n)； function unit_pulse(N) % unit_pulse.m N=10； x=zeros(1,N); x(1)=1; n=0:N-1; figure(1); stem(n,x);xlabel(单位抽样序列) axis([-1 20 0 1.1]) 产生10点同时移位3位的单位抽样序列δ(n-3)； function shift_unit_pulse(N,k) % shift_unit_pulse.m N=10; k=3; x=zeros(1,N); x(k+1)=1; n=0:N-1; figure(2); stem(n,x);xlabel(移位3位的单位抽样序列) axis([-1 20 0 1.1]) 或function [x, n]=i shift_unit_pulse (n0,ns,nf) n=[0:9]； x=[(n-3)==0] 产生任意序列 f(n)=8δ(n)+7δ(n-1)+6δ(n-2) +5δ(n-3)+ 4δ(n-4)+7δ(n-5)； function arbitrary_pulse(N) % arbitrary_pulse.m N=10 x=zeros(1,N); x(1)=8;x(2)=7;x(3)=6;x(4)=5;x(5)=4;x(6)=7; n=0:N-1; figu