/* SAS code for producing confounding schemes for 2^k factorial designs*/
options ls=75;
proc factex;
factors A B C;
size design=8;
blocks size=4;
model estimate=(A|B|C @2);
examine design confounding;
output out=design blockname=block nvals=(1 2);
title1 '2**3 FACTORIAL IN BLOCKS OF SIZE 4';
title2 'CONFOUNDING ABC';
run;
proc print data=design;
run;

proc factex;
factors A B C;
size design=8;
blocks size=4;
model est=(B A*B C A*C B*C A*B*C);
examine design confounding;
output out=design1 blockname=block nvals=(1 2);
title2 '2**3 FACTORIAL IN BLOCKS OF SIZE 4';
title3 'CONFOUNDING MAIN EFFECT A';
run;
proc print data=design1;
run;


__________________________________________________________________________




                   2**3 FACTORIAL IN BLOCKS OF SIZE 4                    1
                              CONFOUNDING ABC
                                          21:33 Thursday, November 18, 2010

                           The FACTEX Procedure

                               Design Points

               Experiment
                   Number       A       B       C     Block
               --------------------------------------------
                        1      -1      -1      -1         1
                        2      -1      -1       1         2
                        3      -1       1      -1         2
                        4      -1       1       1         1
                        5       1      -1      -1         2
                        6       1      -1       1         1
                        7       1       1      -1         1
                        8       1       1       1         2


^L                    2**3 FACTORIAL IN BLOCKS OF SIZE 4                    2
                              CONFOUNDING ABC
                                          21:33 Thursday, November 18, 2010

                           The FACTEX Procedure

                   Block Pseudo-factor Confounding Rules

                             [B1] = A*B*C
^L                    2**3 FACTORIAL IN BLOCKS OF SIZE 4                    3
                              CONFOUNDING ABC
                                          21:33 Thursday, November 18, 2010

                      Obs    block     A     B     C

                       1       1      -1    -1    -1
                       2       1      -1     1     1
                       3       1       1    -1     1
                       4       1       1     1    -1
                       5       2      -1    -1     1
                       6       2      -1     1    -1
                       7       2       1    -1    -1
                       8       2       1     1     1

^L                    2**3 FACTORIAL IN BLOCKS OF SIZE 4                    4
 
                         CONFOUNDING MAIN EFFECT A
                                          21:33 Thursday, November 18, 2010

                           The FACTEX Procedure

                               Design Points

               Experiment
                   Number       A       B       C     Block
               --------------------------------------------
                        1      -1      -1      -1         1
                        2      -1      -1       1         1
                        3      -1       1      -1         1
                        4      -1       1       1         1
                        5       1      -1      -1         2
                        6       1      -1       1         2
                        7       1       1      -1         2
                        8       1       1       1         2
^L                    2**3 FACTORIAL IN BLOCKS OF SIZE 4                    5
                    2**3 FACTORIAL IN BLOCKS OF SIZE 4
                         CONFOUNDING MAIN EFFECT A
                                          21:33 Thursday, November 18, 2010

                           The FACTEX Procedure

                   Block Pseudo-factor Confounding Rules

                             [B1] = A
^L                    2**3 FACTORIAL IN BLOCKS OF SIZE 4                    6

                         CONFOUNDING MAIN EFFECT A
                                          21:33 Thursday, November 18, 2010

                      Obs    block     A     B     C

                       1       1      -1    -1    -1
                       2       1      -1    -1     1
                       3       1      -1     1    -1
                       4       1      -1     1     1
                       5       2       1    -1    -1
                       6       2       1    -1     1
                       7       2       1     1    -1
                       8       2       1     1     1