glogit.dlg

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

/*
  glogit

*! VERSION 1.1.0  07dec2004

  keyword:  eclass

*/

VERSION 9.0

INCLUDE _std_large
INCLUDE header
HELP hlp1, view("help glogit")
RESET res1

DIALOG main, tabtitle("Model")	///
  label("glogit - Weighted least-squares logistic regression for grouped data")
BEGIN
  TEXT     tx_pos	_lft	_top	_vnwd	.,		///
	label("Outcome variable:")
  VARNAME  vn_pos	@	_ss	_vnwd	.,		///
	label("Outcome variable")

  TEXT     tx_pop	_vlx	_top	_vnwd	.,		///
	label("Population variable:")
  VARNAME  vn_pop	@	_ss	_vnwd	.,		///
	label("Population variable")

  TEXT     tx_iv	_lft	_ls	_iwd	.,		///
	label("Independent variables:")
  VARLIST  vl_iv	@	_ss	@	.,		///
	label("Independent variables")				///
	allowcat
END

INCLUDE byifin
INCLUDE se

SCRIPT PREINIT
BEGIN
	script se_createAsJknifeBstrap
END

DIALOG rpt, tabtitle("Reporting")
BEGIN
  DEFINE _x _lft
  DEFINE _cx _spr
  DEFINE _y _top
  INCLUDE _sp_level

  RADIO    rb_default _lft     _ls       _cwd1     .,			/*
  		*/ label("Report coefficients (default)") first
  RADIO    rb_or      @        _ss       @         .,			/*
  		*/ label("Report odds ratios")				/*
  		*/ option(or) last
END

PROGRAM command
BEGIN
	allowxi
	INCLUDE _by_pr
	put "glogit "
	varlist main.vn_pos main.vn_pop [main.vl_iv]
	INCLUDE _ifin_pr
	beginoptions
		put " " /program se_output
		optionarg /hidedefault rpt.sp_level
		option rpt.rb_or
	endoptions
END