************************************************************;
*** DATA ON REACTION YIELD (Y) AT TEMPERATURE LEVEL (X). ***;
*** (FROM `RESPONSE SURFACE METHODOLODY' MYERS (1976))   ***;
************************************************************;

DATA IN; INPUT X Y @@;  X2=X*X; CARDS;
180  82.0    200 89.2    220 94.5    240 99.6
260 102.5    280 103.2   300 103.8

PROC PRINT DATA=IN;
TITLE 'REACTION YIELD (Y) VS TEMPERATURE LEVEL (X) DATA';

PROC GLM DATA=IN;
     MODEL Y = X X*X / SOLUTION I XPX ;
TITLE 'PROC GLM OUTPUT FOR YIELD DATA';

PROC REG DATA=IN;
     MODEL Y = X X2 / COVB I XPX ;
TITLE 'PROC REG OUTPUT FOR YIELD DATA';

PROC RSREG DATA=IN;
     MODEL Y = X ;
TITLE 'PROC RSREG OUTPUT FOR YIELD DATA';

RUN;