fig321.m

高西全2009年最新版<数字信号处理>源码程序

%图3.2.1绘图程序：fig321.m
M=24;
xn=triang(6);
n=-M/3:2*M/3-1;
x=zeros(1,M);
for l=1:6,
    x(8+l)=xn(l);
end
subplot(5,2,1)
stem(n,x,'.');axis([-8,16,0,1])
title('(a) x(n)')
b=[xn' 0 0];
y8=[b,b,b];
subplot(5,2,5)
stem(n,y8,'.');axis([-8,16,0,1])
title('(b) x((n))_8')
y8=[y8 b];
for l=1:M'
    ym(l)=y8(l+2);
end
subplot(5,2,9)
stem(n,ym,'.');axis([-8,16,0,1])
title('(c) x((n+2))_8')
for l=9:16,
    x(l)=ym(l);
end
subplot(5,2,2)
stem(n,x,'.');axis([-8,16,0,1])
xlabel('n');title('(d) x((n+2))_8R_8(n)')