capture program drop twest findfile twres.ado include "`r(fn)'" program define twest, eclass sortpreserve version 11 syntax anything, [,VCE(namelist)] local absorb = "`e(absorb)'" qui{ tempvar touse_reg gen byte `touse_reg'= e(sample) } *check if e() has not been rewritten capt confirm scalar e(dimN) if _rc { di "{err} The e() has been rewritten, please run twset again." exit } *save the macros in scalars and arrays scalar dimN= e(dimN) scalar dimT= e(dimT) scalar rank_adj=e(rank_adj) capt confirm matrix e(invDD) if !_rc { matrix invDD=e(invDD) matrix invHH=e(invHH) if (dimN