diff options
Diffstat (limited to '40/CH8/EX8.8/Exa_8_8.sce')
-rwxr-xr-x | 40/CH8/EX8.8/Exa_8_8.sce | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/40/CH8/EX8.8/Exa_8_8.sce b/40/CH8/EX8.8/Exa_8_8.sce index 7fad7f114..47c388aed 100755 --- a/40/CH8/EX8.8/Exa_8_8.sce +++ b/40/CH8/EX8.8/Exa_8_8.sce @@ -1,9 +1,9 @@ -//Relating DFT and DTFT
-xn=[1 2 1 0];
-XDFT=dft(xn,-1);
-//for F=k/4,k=0,1,2,3
-for k=1:4
- XF(k)=1+2*%e^(-%i*%pi*(k-1)/2)+%e^(-%i*%pi*(k-1));
-end
-XF,XDFT
-disp(XF,'The DFT of x[n] is');
+//Relating DFT and DTFT +xn=[1 2 1 0]; +XDFT=fft(xn,-1); +//for F=k/4,k=0,1,2,3 +for k=1:4 + XF(k)=1+2*%e^(-%i*%pi*(k-1)/2)+%e^(-%i*%pi*(k-1)); +end +XF,XDFT +disp(XF,'The DFT of x[n] is');
\ No newline at end of file |