%
% 實(shí)信號(hào)序列分解為奇部與偶部
%
n = -2:10; x = stepseq(-2,-2,10)-stepseq(7,-2,10);    % 給定的實(shí)序列
[x1,n1] = seqfold(x,n);		                            % 求出序列x(-n)
[xe,nxe] = seqadd(0.5*x,n,0.5*x1,n1);                   % 求分解出的偶序列
[xo,nxo] = seqadd(0.5*x,n,-0.5*x1,n1);                  % 求分解出的奇序列
subplot(2,2,1),stem(n,x),axis([-10,10,0,1.2])           % 畫出實(shí)序列樣本圖
xlabel('n'),ylabel('x(n)'),title('矩形序列')
subplot(2,2,2),stem(nxe,xe),axis([-10,10,0,1.2])        % 畫出偶序列樣本圖
xlabel('n'),ylabel('xe(n)'),title('偶部')
subplot(2,2,3),stem(n1,x1),axis([-10,10,0,1.2])         % 畫出折疊后實(shí)序列樣本圖
xlabel('n'),ylabel('x1(n)'),title('折疊后的矩形序列')
subplot(2,2,4),stem(nxo,xo),axis([-10,10,-0.5,0.5])
xlabel('n'),ylabel('xo(n)'),title('奇部')             % 畫出偶序列樣本圖
%set(gcf,'color','w')                                    % 置圖形背景色為白