|
单位阶越:
8 b8 Q8 j& ?4 m. Y/ efunction [x,n] = stepseq(n0,n1,n2)8 l" p" C) `8 `: K- R1 u5 O! l
% Generates x(n) = u(n-n0); n1 <= n,n0 <= n2
% Y2 r8 q4 T# N/ _( X8 T+ ]% ------------------------------------------
1 v* _; b% [8 |/ A- {) e0 p+ d% [x,n] = stepseq(n0,n1,n2)0 E7 ?* c$ k+ h9 f, f
%
1 f" S& A2 y/ V; Mif ((n0 < n1) | (n0 > n2) | (n1 > n2))
# D& G& j+ h' s* R: [# z error('arguments must satisfy n1 <= n0 <= n2')
3 x% {4 H& y$ N: i7 y, B0 f; `end
% D, s$ q% p/ t' Tn = [n1:n2];
% F0 l0 I9 F# N/ ?' ]; R1 S%x = [zeros(1,(n0-n1)), ones(1,(n2-n0+1))];
1 v/ ?2 o" k6 v8 w6 ?0 lx = [(n-n0) >= 0]; |
|