summaryrefslogtreecommitdiff
path: root/3812/CH10/EX10.12.a/10_12a.sce
blob: 9bac1171df7d5e657858c385e4d4f8aa065c62d4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//example 10.12(a):
//Find Z transform
clc;
function[za]=ztransfer(sequence,n)
z=poly(0,'z','r')
za=sequence*(1/z)^n'
endfunction
x=[1,2,6,-2,0,3];
n1=0:length(x)-1;
X=ztransfer(x,n1);
disp(X,'X(z)=');
funcprot(0);