m06_encode.m

MATLAB仿真技术与实例应用教程

n=31;   %码常
k=26;   %信元长度
num_of_row=200;
msg=randint(k*num_of_row,1,2);   %信号码元
code =encode(msg,n,k,'hamming');        %Hamming编码
msg = decode(code, n, k, 'hamming');    %Hamming解码

noise=randerr(num_of_row,n,3);          %随机误差比特
code=rem(code(:)+noise(:),2);           
    %在每个码字随机增加一个误差比特
rcv=decode(code, n, k, 'hamming');      %Hamming解码     
errs=biterr(rcv,msg)                %计算误差比特数目