*! version 1.0.0  28apr2006
clear
set mem 100m
set more off

capture log close 

sjlog using ex1, replace
use mepssmall

mtreatnb docvis age female minority education nchroniccond, 	///
  mtreat(instype age female minority education 		///
  nchroniccond firmsize govtjob) sim(400) basecat(ffs) robust
sjlog close 

sjlog using ex2, replace
*** likelihood ratio test of exogeneity ***
scalar LR = 2*(e(ll) - e(ll_exog))
scalar p = 1-chi2(2,LR)
display LR
display p
sjlog close