weibull.ado

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

*! version 8.1.3  31aug2004
program define weibull, byable(onecall) eclass prop(ml_score)
	version 7

	if _by() {
		local by "by `_byvars'`_byrc0':"
	}

	if replay() {
		if `"`e(cmd)'"' != "weibull" { 
			error 301 
		} 
		if "`e(by_weibull_c)'"!="" { 
			`by' weibull_c `0'
		}
		else	`by' weibull_s `0'
		exit
	}
	syntax [varlist] [if] [in] [fweight pweight iweight] /*
		*/ [, ANCillary(string) STrata(string) noCONstant /*
		*/ OFFset(string) * ]

	if "`ancillary'"=="" & "`strata'"=="" & "`constant'"=="" & /*
		*/ `"`offset'"'=="" {
		`by' weibull_s `0'
	}
	else	`by' weibull_c `0'
end