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

通讯编程文档

开发平台:

Matlab

  1. % MATLAB script for Illustrative Problem 8.4.  
  2. echo on
  3. a_db=[-13:0.5:13];
  4. a=10.^(a_db/10);
  5. c_hard=1-entropy2(Q(a));
  6. for i=1:53
  7.   f(i)=quad('il3_8fun',a(i)-5,a(i)+5,1e-3,[],a(i));
  8.   g(i)=quad('il3_8fun',-a(i)-5,-a(i)+5,1e-3,[],-a(i));
  9.   c_soft(i)=0.5*f(i)+0.5*g(i);
  10.   echo off ;
  11. end
  12. echo on ;
  13. pause % Press a key to see the capacity curves.
  14. semilogx(a,c_soft,a,c_hard)