// re-centering x
clear all
set obs 100
generate ru = runiform()
generate x = runiform((-1),1)
generate x1 = x
generate y = ru < invlogit(x1)
postfile logitvar shift beta0 se0 beta1 se1 using "logitvar.dta", replace
forvalues i = -1(0.05)1 {
	replace x1 = x+`i'
	quietly logit y x
	post logitvar (`i') (_b[_cons]) (_se[_cons]) (_b[x]) (_se[x])
	}

postclose logitvar

use logitvar.dta, clear
scatter se0 beta0, xline(0) title("Constant") name(constant)
scatter se1 beta1, xline(1) title("Discrimination") name(beta)
graph combine constant beta, title("Re-centered x") ///
	subtitle("(no effect of {&beta}s or {&sigma}s)") ///
	note("40 shifts in x") xcommon ycommon