%參數(shù)設(shè)置
n?=?20;?%?Number?of?columns
w_c?=?3;?%?Column?weight
w_r?=?4;?%?Row?weight
k?=?n*w_c/w_r;?%?Number?of?rows
H_sub?=?zeros（n/w_rn）;?%?First?sub-matrix;?there?are?w_c?such?sub-matrices.

%產(chǎn)生第一個(gè)子矩陣
for?i?=?1:n/w_r
for?j?=?（i-1）*w_r+1:i*w_r
H_sub（ij）?=?H_sub（ij）?+?1;
end
end

%對后兩個(gè)矩陣進(jìn)行列置換
H_pre?=?H_sub;
for?t?=?2:w_c
?x?=?randperm（n）;
?H_sub_perm?=?H_sub（:x）;
H_pre?=?[H_pre?H_sub_perm];
end
%將生成的三個(gè)子矩陣上下排列好，結(jié)束
H?=?zeros（kn）;
for?p?=?1:w_c
?
H（（p-1）*（n/w_r）+1:（p）*（n/w_r）1:n）?=?H（（p-1）*（n/w_r）+1:（p）*（n/w_r）1:n）?+?H_pre（:（p-1）*n+1:p*n）;
end
H

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件????????626??2018-11-03?20:28??GALLAGER.m

-----------?---------??----------?-----??----

??????????????????626????????????????????1