?================================================================
? Load the health care project and set the panel
?================================================================
?
SETPANEL ; Group = ID ; Pds = ti $
?
?--------------------------------------------------------
? (1)
?--------------------------------------------------------
SAMPLE ; All $
LOGIT ; Lhs = Doctor ; Rhs = income,educ ; panel $ Pds = ti $ (Conditional)
LOGIT ; Lhs = Doctor ; Rhs = income,educ ; panel ; Fixed $ (Unconditional)
REJECT ; ti > 2 $
LOGIT ; Lhs = Doctor ; Rhs = income,educ ; panel $ (Conditional)
LOGIT ; Lhs = Doctor ; Rhs = income,educ ; panel; Fixed $ (Unconditional)
?--------------------------------------------------------
?  (2)
?--------------------------------------------------------
Sample ; All $
Logit ; Lhs = Doctor ; Rhs = income,educ,hhkids ; panel $
Matrix ; bfe = B ; Vfe = VARB $
Logit ; Lhs = Doctor ; Rhs = income,educ,hhkids,one $
Matrix ; db = bfe - b(1:3) ; dV = Vfe - Varb(1:3,1:3) $
Matr;list;root(dv)$
Matrix ; List ; Hausman = db'<dv>db $
?--------------------------------------------------------
?  (3)
?--------------------------------------------------------
Probit ; lhs = hospital ; Rhs = income,educ,hhkids,one 
       ; random ; panel ;maxit=10$
Probit ; lhs = hospital  ; Rhs = income,educ,hhkids,one 
       ; Fixed ;  panel $
?--------------------------------------------------------
?  (4)
?--------------------------------------------------------
Sample ; All $
Create ; incbar=GroupMean (income, Pds=ti)  $
Create ; educbar=GroupMean (educ, Pds=ti)  $
Create ; kidsbar=GroupMean (hhkids, Pds=ti)  $
Logit ; lhs = Doctor ; Rhs = income,educ,hhkids ; pds = ti $
Logit ; lhs = Doctor ; Rhs = income,educ,hhkids,incbar,educbar,kidsbar 
; Random ; pds = ti $
?================================================================
?================================================================
?--------------------------------------------------------
?  (5)
?--------------------------------------------------------
Sample  ; All $
Reject  ; ti < 7 $
Namelist; X = income,educ,hhkids,one $
Probit  ; lhs = hospital ; Rhs = x ;  pds = ti  ;maxit=10
	  ; random effects $
Probit  ; lhs = hospital ; Rhs = x ; pds = ti  ;maxit=10  
        ; RPM ; Fcn = One(n) ; Pts = 20 $
Calc    ; K1 = Col(X) + 1 $
Calc    ; List ; SRP = B(K1) ; RhoRP = SRP^2 / (1 + SRP^2) $


setpanel ; group=id ; pds=grpsize$
sample;all$
probit;lhs=doctor;rhs=x;panel$