%Samp2_18
clf
n0=0;
n1=-10;
n2=10;n=[n1:n2];  %序號序列
x=[(n-n0)>=0];    %階躍信號值序列
subplot(2,2,1)
stem(n,x);        %繪出階躍信號
xlabel('n');ylabel('x(n)');title('階躍序列');
grid on;
[xeven,xodd,m]=evenodd(x,n);   %進行奇偶分解得到偶序列xeven和奇序列xodd
subplot(2,2,2)
stem(m,xeven);    %繪制偶序列圖
xlabel('m');ylabel('xe(n) ');title('偶函數部分');
grid on;
subplot(2,2,3)
stem(m,xodd);     %繪制奇序列圖
xlabel('m');ylabel('xo(n)');title('奇函數部分');
grid on