a1_a2.m

来自「matlab在通信原理中的应用」· M 代码 · 共 28 行

function [h]=A1_A2(u)

[a b]=size(u);
m1=0;

for xx=1:a/9
    m1=(xx-1)*9;
    
    %A1, A2
    u((1+m1),1:16)= [1 1 1 1 0 1 1 0 0 0 1 0 1 0 0 0];
    
    %J0
    u((1+m1),17:24)= [0 0 0 0 0 0 0 0];
    
    %E1
    u((2+m1),9:16) = [0 0 0 0 0 0 0 0];
    
    %F1
    u((2+m1),17:24) = [0 0 0 0 0 0 0 0];
    
    %D1 - D3
    u((3+m1),1:24)= [0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1];
    
end

   %Salida
   h=u(:,:);