n=[0:6];
x=[1,-2,4,6,-5,8,10];
[x2,n2]=sigshift(x,n,-2);
[x3,n3]=sigshift(x,n,4);
[x4,n4]=sigadd(3*x2,n2,x3,n3);
[x1,n1]=sigadd(x4,n4,-2*x,n);
[xe1,xo1,m1]=evenodd(x1,n1);
subplot(2,1,1);
stem(m1,xe1)
title('偶部');
subplot(2,1,2);
stem(m1,xo1)
title('奇部');