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

通讯编程文档

开发平台:

Matlab

  1. % MATLAB script for Illustrative Problem 6.8.
  2. echo on
  3. N=31;
  4. T=1;
  5. W=1/(2*T);
  6. n=-(N-1)/2:(N-1)/2; % the indices for g_T
  7. % The expression for g_T is obtained next.
  8. for i=1:length(n),
  9.   g_T(i)=0;
  10.   for m=-(N-1)/2:(N-1)/2,
  11.     if ( abs((4*m)/(N*T)) <= W ),
  12.       g_T(i)=g_T(i)+sqrt((1/W)*cos((2*pi*m)/(N*T*W)))*exp(j*2*pi*m*n(i)/N);
  13.     end;
  14.     echo off ;
  15.   end;
  16. end;
  17. echo on ;
  18. g_T=real(g_T) ; % The imaginary part is due to the finite machine precision 
  19. % Obtain g_T(n-(N-1)/2).
  20. n2=0:N-1;
  21. % Obtain the frequency response characteristics.
  22. [G_T,W]=freqz(g_T,1);
  23. % normalized magnitude response  
  24. magG_T_in_dB=20*log10(abs(G_T)/max(abs(G_T)));
  25. % impulse response of the cascade of the transmitter and the receiver filters
  26. g_R=g_T;
  27. imp_resp_of_cascade=conv(g_R,g_T);
  28. % Plotting commands follow.