cls;
% -------------------------------------------------------------------------
% Run the Block Code Model (5,2) and (8,2)on the five genomes using the 
% minimum Hamming distance metric:
[A1,B1,C1,D1] = BlockCodeModel(5,2,1,1);
figure,[A2,B2,C2,D2] = BlockCodeModel(5,2,2,1);
figure,[A3,B3,C3,D3] = BlockCodeModel(5,2,3,1);
figure,[A4,B4,C4,D4] = BlockCodeModel(5,2,4,1);
figure,[A5,B5,C5,D5] = BlockCodeModel(5,2,5,1);

% (8,2) Block Code Model
figure,[A6,B6,C6,D6] = BlockCodeModel(8,2,1,1);
figure,[A7,B7,C7,D7] = BlockCodeModel(8,2,2,1);
figure,[A8,B8,C8,D8] = BlockCodeModel(8,2,3,1);
figure,[A9,B9,C9,D9] = BlockCodeModel(8,2,4,1);
figure,[A10,B10,C10,D10] = BlockCodeModel(8,2,5,1);
% -------------------------------------------------------------------------
% Run the Block Code Model (5,2) and (8,2)on the five genomes using the 
% Free Energy distance metric:
figure,[A11,B11,C11,D11] = BlockCodeModel(5,2,1,2);
figure,[A12,B12,C12,D12] = BlockCodeModel(5,2,2,2);
figure,[A13,B13,C13,D13] = BlockCodeModel(5,2,3,2);
figure,[A14,B14,C14,D14] = BlockCodeModel(5,2,4,2);
figure,[A15,B15,C15,D15] = BlockCodeModel(5,2,5,2);

% (8,2) Block Code Model
figure,[A16,B16,C16,D16] = BlockCodeModel(8,2,1,2);
figure,[A17,B17,C17,D17] = BlockCodeModel(8,2,2,2);
figure,[A18,B18,C18,D18] = BlockCodeModel(8,2,3,2);
figure,[A19,B19,C19,D19] = BlockCodeModel(8,2,4,2);
figure,[A20,B20,C20,D20] = BlockCodeModel(8,2,5,2);
% -------------------------------------------------------------------------
% Run the Block Code Model (5,2) and (8,2)on the five genomes using the 
% Exponentially Weighted Free Energy distance metric:
figure,[A21,B21,C21,D21] = BlockCodeModel(5,2,1,3);
figure,[A22,B22,C22,D22] = BlockCodeModel(5,2,2,3);
figure,[A23,B23,C23,D23] = BlockCodeModel(5,2,3,3);
figure,[A24,B24,C24,D24] = BlockCodeModel(5,2,4,3);
figure,[A25,B25,C25,D25] = BlockCodeModel(5,2,5,3);

% (8,2) Block Code Model
figure,[A26,B26,C26,D26] = BlockCodeModel(8,2,1,3);
figure,[A27,B27,C27,D27] = BlockCodeModel(8,2,2,3);
figure,[A28,B28,C28,D28] = BlockCodeModel(8,2,3,3);
figure,[A29,B29,C29,D29] = BlockCodeModel(8,2,4,3);
figure,[A30,B30,C30,D30] = BlockCodeModel(8,2,5,3);
% -------------------------------------------------------------------------