probit.ado

是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到

*! version 1.0.7  24feb2005
program define probit, eclass sortpreserve byable(onecall) ///
		prop(svyb svyj svyr swml)
	version 9, missing
	local version : di "version " string(_caller()) ", missing :"

	if _by() {
		local BY `"by `_byvars'`_byrc0':"'
	}
	`version' `BY' _vce_parserun probit : `0'
	if "`s(exit)'" != "" {
		exit
	}
	if replay() {
		if !inlist("`e(cmd)'", "probit", "bprobit", "dprobit") {
			error 301
		}
		if _by() {
			error 190
		}
		`version' Display `0'
		exit
	}
	syntax [anything] [if] [in] [fw iw pw aw] [, * ]
	`version' `BY' _probit `0'
	ereturn local title "Probit regression"
end

program Display
	version 9
	local version : di "version " string(_caller()) ":"
	syntax [, Level(cilevel) GROUPED * ]
	if "`e(prefix)'" != "" {
		_coef_table_header
		di
		_coef_table, level(`level') `options'
		_prefix_footnote
	}
	else	`version' _probit, level(`level') `options' `grouped'
end

exit