//(1) when we use xtreg, r2_a are quite different with/without ro. why?
xtreg ln_w grade age* ttl_exp* tenure* black not_smsa south, fe
disp e(r2), e(r2_a) //r2 mean within r2
mat b=e(b)
sca k= colsof(b)
disp 1-(1-e(r2))*(e(N)-1)/(e(N)-k-e(N_g)) //does this formular work for panel data?
xtreg ln_w grade age* ttl_exp* tenure* black not_smsa south, fe ro
disp e(r2), e(r2_a)
//(2) when we use reg, r2_a are the same with/without ro
reg ln_w grade age* ttl_exp* tenure* black not_smsa south
disp e(r2), e(r2_a)