/**********************************************************************/
/*    Atkinson, Donev, and Tobias, "Optimum Experimental Designs"     */
/*                                                                    */
/*    NAME: Program 16.2                                              */
/*   TITLE: Example 16.1 Modification of an Acrylonitrile Powder      */
/*    KEYS:                                                           */
/*    DATA:                                                           */
/*   NOTES: Uses the ADX macros to create XVERT points.               */
/*                                                                    */
/*  Author: Randy Tobias                                              */
/* History:                                                           */
/*    Created...............................................27Jun2007 */
/**********************************************************************/

title1 "Example 16.1 Modification of an Acrylonitrile Powder";

%adxgen;
%adxmix;

/*
/  The ADXXVERT macro implements Snee and Marquardt's XVERT algorithm.
/  Note that the design give in the text omits the overall centroid,
/  which is the point with dimen=2 in the following.
/---------------------------------------------------------------------*/
%adxxvert(Design,x1 0.2-0.8 / x2 0.2-0.8 / x3 0.0-0.6);
data Design; set Design;
   label x1 = "x1 CuSO4"
         x2 = "x2 Na2S2O3"
         x3 = "x3 (CHO)2";
proc print data=Design label;
run;

title1;