%dm13107
%繪制單位序列響應時域波形
n=-10:20;                        %定義離散時間向量n
u=jyxl(n)                         %產生單位階躍序列u（見第7章jyxl()函數）
h=(4*(1/2).^n-2*(1/4).^n).*u;        %產生單位序列響應h
stem(n,h,'filled')                    %繪制單位序列響應h時域波形
title('單位序列響應h(n)')            %定義標題
xlabel('n')                         %定義橫坐標