* options ls=80 nonumber nodate;

 * Lect01.sas  PubH 6470  ;

 * Data adapted from  Gelman and Hill, who cite the National Longitudinal Survey of Youth ;

  data A;
    set child_iq;
	if (male=1) then gender="M";
	if (male=0) then gender="F";

  proc reg data = A;
    model child_iq = mom_iq mom_age mom_HS_grad;

  proc reg data = A;
    model child_iq = mom_iq mom_age mom_HS_grad;
	by gender;


 run; quit;