** Lab session #11: KKM Ch.17:#2, 5 Ch.20: #5 **;

libname b145 'C:\faiz\sas\sasdata\fall97\bios145';

options pageno=1 ps=56 ls=79;

/* KKM Ch.17 #2 */

data one;

   input city y;

   cards;
1 2
1 1
1 3
2 4
2 6
2 8
3 2
3 5
3 2
;

run;

proc glm data=one;
   class city;
   model y=city;
   means city / bon;
   title2 "KKM Ch.17 #2";
quit;

/* KKM Ch.17 #4 (with #2 questions) */

data two;

   input drug y;

   cards;
1 .10
1 .12
1 .08
1 .14
2 .12
2 .14
2 .19
3 .20
3 .25
3 .15
;

run;

proc glm data=two;
   class drug;
   model y=drug;
   means drug;
   title2 "KKM Ch.17 #4 with #2 questions";
quit;

/* KKM Ch.20 #5 */

data three;

   input vic $ soc $ conf;

   cards;
0  LO  4
0  LO  14
0  LO  15
0  LO  19
0  LO  17
0  LO  17
0  LO  16
0  MED 7
0  MED 10
0  MED 12
0  MED 15
0  MED 16
0  HI  8
0  HI  19
0  HI  10
0  HI  17
1  LO  2
1  LO  17
1  LO  18
1  MED 6
1  MED 19
1  MED 12
1  MED 12
1  HI  7
1  HI  6
1  HI  5
1  HI  3
1  HI  16
2+ LO  7
2+ LO  8
2+ LO  2
2+ LO  11
2+ LO  12
2+ MED 1
2+ MED 2
2+ MED 4
2+ HI  4
2+ HI  2
2+ HI  8
2+ HI  9
;

run;

proc glm data=three order=data;
   class vic soc;
   model conf=vic soc vic*soc / solution;
   means vic soc vic*soc;
   title2 "KKM Ch.20 #5";
quit;