options linesize=80;
options pagesize=60;


filename galluprw "./gallup.txt";

data gallup;
  infile galluprw;
  input loc age race gend educ emp wage hours
        weeks salary income disloc train monthu 
        rate;

  /* make the years of schooling variable */
  yrschool=8;
  if educ eq 4 then yrschool = 10;
  if educ eq 5 then yrschool = 12;
  if educ eq 6 then yrschool = 14;
  if educ eq 7 then yrschool = 14;
  if educ eq 8 then yrschool = 16;

  pgh=0; if loc EQ 6 then pgh=1;
  mon=0; if loc EQ 5 then mon=1;
  rst=0; if loc EQ 7 then rst=1;

proc means;

proc reg;
  model emp = pgh mon age yrschool / ACOV;

proc logistic descending;
  model emp = pgh mon age yrschool;
proc logistic descending;
  model emp = age yrschool;

proc probit;
  class emp;  
  model emp = pgh mon age yrschool;  
proc probit;
  class emp;  
  model emp = age yrschool;