%*******************************************%
%函數名：H_Mat
%功能：  按生成表生成H矩陣
%參數：  無
%返回值：H矩陣4608×9216
%*******************************************%
function [y] = H_Mat
BaseMat = zeros(4608,9216);	%生成4608×9216全零矩陣
Col_Table = H_MatTable;		%導入H矩陣的生成表
for row = 1:4608		%按行作遍歷
    BaseMat(row,(Col_Table(row,:)+1)) = 1;%根據生成表的指示將該行對應元素置為1
                                          %加一是因為Matlab數組元素下標是從1開始，而生成表是從0開始
end

y = BaseMat;
clear BaseMat Col_Table row 
save y;