regress.ado

来自「是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到」· ADO 代码 · 共 40 行

*! version 1.0.6  24feb2005
program define regress, 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 regress : `0'
	if "`s(exit)'" != "" {
		exit
	}
	if replay() {
		if _by() {
			error 190
		}
		`version' Display `0'
		exit
	}
	syntax [anything] [if] [in] [aw fw iw pw] [, * ]
	`version' `BY' _regress `0'
	ereturn local title "Linear regression"
end

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

exit