diff options
Diffstat (limited to '62/CH6/EX6.4/ex_6_4.sce')
-rwxr-xr-x | 62/CH6/EX6.4/ex_6_4.sce | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/62/CH6/EX6.4/ex_6_4.sce b/62/CH6/EX6.4/ex_6_4.sce new file mode 100755 index 000000000..afdcc7cff --- /dev/null +++ b/62/CH6/EX6.4/ex_6_4.sce @@ -0,0 +1,26 @@ +clear;
+close;
+clc;
+T0=10;
+w0=%pi/5;
+y=[ones(1,5) zeros(1,5)];
+n=-20:19;
+x=[];
+for i=1:length(n)/T0
+ x=[x y];
+end
+plot2d3(n,x);
+plot(n,x,'r.')
+xtitle('x[n]','n')
+for k=0:9
+ c(k+1)=0;
+ for n=0:4
+ c(k+1)=c(k+1)+ (1/4)*(y(n+1))*(%e)^(%i*w0*k*n);
+ end
+end
+c=[c($:-1:2) ;c];
+k=-9:9;
+figure
+plot2d3(k,abs(c));
+plot(k,abs(c),'r.--')
+xtitle('|ck|','k')
\ No newline at end of file |