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

通讯编程文档

开发平台:

Matlab

  1. % MATLAB script for Illustrative Problem 8.9.
  2. echo on
  3. k=11;
  4. for i=1:2^k
  5.   for j=k:-1:1
  6.     if rem(i-1,2^(-j+k+1))>=2^(-j+k)
  7.       u(i,j)=1;
  8.     else
  9.       u(i,j)=0;
  10.     end
  11.     echo off ;
  12.   end
  13. end
  14. echo on ;
  15. g=[1 0 0 0 0 0 0 0 0 0 0 1 1 0 0;
  16.    0 1 0 0 0 0 0 0 0 0 0 0 1 1 0;
  17.    0 0 1 0 0 0 0 0 0 0 0 0 0 1 1;
  18.    0 0 0 1 0 0 0 0 0 0 0 1 0 1 0;
  19.    0 0 0 0 1 0 0 0 0 0 0 1 0 0 1;
  20.    0 0 0 0 0 1 0 0 0 0 0 0 1 0 1;
  21.    0 0 0 0 0 0 1 0 0 0 0 1 1 1 0;
  22.    0 0 0 0 0 0 0 1 0 0 0 0 1 1 1;
  23.    0 0 0 0 0 0 0 0 1 0 0 1 0 1 1;
  24.    0 0 0 0 0 0 0 0 0 1 0 1 1 0 1;
  25.    0 0 0 0 0 0 0 0 0 0 1 1 1 1 1];
  26. c=rem(u*g,2);
  27. w_min=min(sum((c(2:2^k,:))'));