data type1;
input n p k wt;
cards;
10 10 10 65
10 10 20 80
10 10 30 104
10 20 10 87
10 20 20 108
10 20 30 126
10 30 10 107
10 30 20 126
10 30 30 148
20 10 10 86
20 10 20 107
20 10 30 129
20 20 10 107
20 20 20 126
20 20 30 148
20 30 10 125
20 30 20 144
20 30 30 168
30 10 10 108
30 10 20 129
30 10 30 141
30 20 10 125
30 20 20 143
30 20 30 168
30 30 10 149
30 30 20 163
30 30 30 184
;
proc reg data=type1;
model wt = n p k;
run;
quit;

proc glm data=type1;
/* Note Type I SS for regressions and Residual SS  */
model wt = n p k;
run;
quit;

proc glm data=type1;
/* Note Type I SS for regressions and Residual SS  */
model wt = n;
run;
quit;

proc glm data=type1;
/* Note Type I SS for regressions and Residual SS  */
model wt = n p;
run;
quit;