** Lab session #4: KKM Ch.14:#2 **;

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

options pageno=1 ps=56 ls=79;

proc format;

   value aft
      0="Latin Am."
      1="African"
      ;

run;


/* Getting computer output */

data one;

   input country yng pci;
   format country aft.;

   cards;
0 32.2 788
0 47.0 202
0 34.0 825
0 36.0 675
0 38.7 590
0 40.9 408
0 45.0 324
0 45.4 235
0 42.2 338
0 44.0 292
0 44.0 321
0 43.0 300
0 43.0 323
0 40.0 484
0 37.0 625
0 39.0 525
0 44.6 340
0 33.0 765
0 35.0 685
0 47.4 220
0 48.0 195
0 37.0 605
0 38.4 530
0 40.6 480
0 35.8 690
0 36.0 685
1 34.0 317
1 36.0 270
1 38.2 208
1 43.0 150
1 44.0 105
1 44.0 128
1 46.0 85
1 48.0 75
1 40.0 210
1 41.0 188
1 42.0 166
1 45.0 132
1 36.0 290
1 42.6 160
1 33.0 300
1 33.0 320
1 47.0 85
1 47.0 75
1 39.0 225
1 39.0 232
1 37.0 260
1 37.0 250
1 46.0 92
1 45.6 110
1 42.0 180
1 38.8 235
;

run;

proc glm data=one;
   by country;
   model pci=yng;
quit;