Response Surface Study

 /****************************************************************/
 /*          S A S   S A M P L E   L I B R A R Y                 */
 /*                                                              */
 /*    NAME: ADXRESP1                                            */
 /*   TITLE: Response Surface Study                              */
 /* PRODUCT: QC                                                  */
 /*  SYSTEM: ALL                                                 */
 /*    KEYS: Design of Experiments,                              */
 /*   PROCS:                                                     */
 /*    DATA:                                                     */
 /*                                                              */
 /*     REF: SAS/QC Software:  Examples                          */
 /*    MISC: ADX Macros are stored in the AUTOCALL library       */
 /*                                                              */
 /*                                                              */
 /****************************************************************/

options ps=55 ls=78;

%adxgen;
%adxff;
%adxcc;
%adxinit

%adxpcc(3)

%adxccd(bread,3,8,6,1.6818)

%adxdcode(bread, t1 sealtemp 225 285
                /t2 cooltemp 46  64
                /t3 polyadd  0.5 1.7)
%adxrprt(bread,sealstr,seed=23456)

proc sort;
   by sealtemp cooltemp polyadd;
data bread;
   set bread;
   input @@ sealstr;
   cards;
   9.8 6.6 9.2 7.9 10.4 6.9 4.0 10.1 9.9 12.2
   9.7 9.7 9.6 8.6  6.3 6.9 6.8  6.1 7.3  5.0
   ;

proc rsreg;
   model sealstr = sealtemp cooltemp polyadd / lackfit;
run;