global xvar "gender age married hhsize BMI_se1"
global zvar "logincome married i.Education farmer tap_water cond"
xi:dprobit m23 $xvar  $zvar,cluster( commid )
foreach z of global zvar {
quietly sum `z’
gen `z’_mean = r(mean)
gen `z’_copy = `z’
replace `z’ = `z’_mean
}
predict m23hat
foreach z of global zvar {
replace `z’ = `z’_copy
drop `z’_copy `z’_mean
}
qui sum m23
红色部分老出现` invalid name

以后要注意`z’的后标必须是英文输入法下的。