Ip_01_06.m
上传用户:loeagle
上传日期:2013-03-02
资源大小:1236k
文件大小:1k
源码类别:

通讯编程文档

开发平台:

Matlab

  1. % MATLAB script for Illustrative Problem 6, Chapter 1
  2. echo on
  3. ts=0.2;                     % set parameters
  4. fs=1/ts;
  5. df=0.01;
  6. x=[zeros(1,10),[0:0.2:1],ones(1,9),[1:-0.2:0],zeros(1,10)];
  7. [X,x,df1]=fftseq(x,ts,df);          % derive the FFT
  8. X1=X/fs;                                    % scaling
  9. f=[0:df1:df1*(length(x)-1)]-fs/2;           % frequency vector for FFT
  10. f1=[-2.5:0.001:2.5];                        % frequency vector for analytic approach
  11. y=4*(sinc(2*f1)).^2-(sinc(f1)).^2;          % exact Fourier transform
  12. pause % Press akey to see the plot of the Fourier Transform derived analytically.
  13. clf
  14. subplot(2,1,1)
  15. plot(f1,abs(y));
  16. xlabel('Frequency')
  17. title('Magnitude-pectrum of x(t) derived analytically')
  18. pause % Press akey to see the plot of the Fourier Transform derived numerically.
  19. subplot(2,1,2)
  20. plot(f,fftshift(abs(X1)));
  21. xlabel('Frequency')
  22. title('Magnitude-pectrum of x(t) derived numerically')