xtmixed.dlg

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

  	label("Estimation method")
  RADIO    rb_reml		_ilft	_ss	_inwd	.,		///
	first 								///
	label("Restricted maximum likelihood (REML)")			///
	option(reml)
  RADIO    rb_mle		@	_ss	@	.,		///
	last								///
	label("Maximum likelihood (ML)")		 		///
	option(mle)

  CHECKBOX ck_nstderr		_lft	_xls	_iwd	.,		///
	option(nostderr)						///
	label("Do not estimate standard errors of random-effects parameters")

  CHECKBOX ck_nolrtest		@	_ms	@	.,		///
	option(nolrtest)						///
	label("Do not perform LR test comparing to linear regression")
END

INCLUDE byifin

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

  GROUPBOX gb_fe_re		_lft	_ls	_iwd	_ht6,		///
  	label("Fixed-effects and random-effects estimates")
  RADIO    rb_both		_ilft	_ss	_inwd	.,		///
	first								///
	label("Report both fixed-effects and random-effects")
  RADIO    rb_fixed		@	_ss	@	.,		///
	label("Report only fixed-effects")				///
	option(noretable)
  RADIO    rb_random		@	_ss	@	.,		///
	last								///
	label("Report only random-effects")				///
	option(nofetable)

  GROUPBOX gb_rpt_method	_lft	_xls	_iwd	_ht4,		///
  	label("Reporting method for variance components")
  RADIO    rb_stddev		_ilft	_ss	_inwd	.,		///
	first		  						///
	label("Report as standard deviations and correlations")		///
	onclickon(rpt.ck_estmetric.enable)
  RADIO    rb_variance		@	_ss	@	.,		///
	last option(variance)  						///
	label("Report as variances and covariances")			///
	onclickon(rpt.ck_estmetric.disable)

  CHECKBOX ck_estmetric		_lft	_xls	_iwd	.,		///
	label("Report parameter estimates in the estimation metric") 	///
	option(estmetric)

  CHECKBOX ck_noheader		_lft	_ms	_iwd	.,		///
	label("Suppress output header") option(noheader)

  CHECKBOX ck_nogroup		_lft	_ms	_iwd	.,		///
	label("Suppress table summarizing groups") option(nogroup)
END

DIALOG em, tabtitle("EM options")
BEGIN
  SPINNER  sp_emiter		_lft	_top	_spwd	.,		///
	label("Number of EM iterations") option(emiter)		 	///
	min(0) max(16000) default(20)
  TEXT     tx_emiter		_spsep	@	_spr	.,		///
	label("Number of EM iterations")

  EDIT	   ed_emtol		_lft	_ls	_en7wd	.,		///
	label("EM convergence tolerance") default(1e-10) 		///
	option(emtolerance)
  TEXT     tx_emtol		_en7sep	@	_en7r	.,		///
	label("EM convergence tolerance")

  CHECKBOX ck_emonly		_lft	_ls	_cwd1	.,		///
	label("Fit model exclusively using EM") option(emonly)

  GROUPBOX gb_log		_lft	_ls	_cwd1	_ht8,		///
  	label("EM iteration log")
  RADIO    rb_default		_ilft	_ss	_inwd	.,		///
  	first								///
  	label("Use default")
  RADIO    rb_nolog		@	_ss	@	.,		///
	label("Suppress log") option(noemshow)
  RADIO    rb_emlog		@	_ss	@	.,		///
	label("Show log") option(emlog)
  RADIO    rb_emdots		@	_ss	@	.,		///
	last 								///
	label("Show EM iterations as dots") option(emdots)
END

INCLUDE max_ml

PROGRAM equation_1_output
BEGIN
	if main.ck_equation_1 {
		put " " "|| "
		require main.vn_level_1
		put main.vn_level_1 ": "
		if main.ck_factor_eq_1 {
			require main.vn_factor_eq_1
			put "R."
			put main.vn_factor_eq_1
			beginoptions
				optionarg main.cb_fcov_structure_1
			endoptions
		}
		if ! main.ck_factor_eq_1 {
			varlist [main.vl_independent_1]
			beginoptions
				option main.ck_noconstant_1
				optionarg main.cb_cov_structure_1
			endoptions
		}
	}
END

PROGRAM equation_2_output
BEGIN
	if main.ck_equation_2 {
		put " " "|| "
		require main.vn_level_2
		put main.vn_level_2 ": "
		if main.ck_factor_eq_2 {
			require main.vn_factor_eq_2
			put "R."
			put main.vn_factor_eq_2
			beginoptions
				optionarg main.cb_fcov_structure_2
			endoptions
		}
		if ! main.ck_factor_eq_2 {
			varlist [main.vl_independent_2]
			beginoptions
				option main.ck_noconstant_2
				optionarg main.cb_cov_structure_2
			endoptions
		}
	}
END

PROGRAM equation_3_output
BEGIN
	if main.ck_equation_3 {
		put " " "|| "
		require main.vn_level_3
		put main.vn_level_3 ": "
		if main.ck_factor_eq_3 {
			require main.vn_factor_eq_3
			put "R."
			put main.vn_factor_eq_3
			beginoptions
				optionarg main.cb_fcov_structure_3
			endoptions
		}
		if ! main.ck_factor_eq_3 {
			varlist [main.vl_independent_3]
			beginoptions
				option main.ck_noconstant_3
				optionarg main.cb_cov_structure_3
			endoptions
		}
	}
END

PROGRAM equation_4_output
BEGIN
	if main.ck_equation_4 {
		put " " "|| "
		require main.vn_level_4
		put main.vn_level_4 ": "
		if main.ck_factor_eq_4 {
			require main.vn_factor_eq_4
			put "R."
			put main.vn_factor_eq_4
			beginoptions
				optionarg main.cb_fcov_structure_4
			endoptions
		}
		if ! main.ck_factor_eq_4 {
			varlist [main.vl_independent_4]
			beginoptions
				option main.ck_noconstant_4
				optionarg main.cb_cov_structure_4
			endoptions
		}
	}
END

PROGRAM equation_5_output
BEGIN
	if main.ck_equation_5 {
		put " " "|| "
		require main.vn_level_5
		put main.vn_level_5 ": "
		if main.ck_factor_eq_5 {
			require main.vn_factor_eq_5
			put "R."
			put main.vn_factor_eq_5
			beginoptions
				optionarg main.cb_fcov_structure_5
			endoptions
		}
		if ! main.ck_factor_eq_5 {
			varlist [main.vl_independent_5]
			beginoptions
				option main.ck_noconstant_5
				optionarg main.cb_cov_structure_5
			endoptions
		}
	}
END

PROGRAM equation_6_output
BEGIN
	if main.ck_equation_6 {
		put " " "|| "
		require main.vn_level_6
		put main.vn_level_6 ": "
		if main.ck_factor_eq_6 {
			require main.vn_factor_eq_6
			put "R."
			put main.vn_factor_eq_6
			beginoptions
				optionarg main.cb_fcov_structure_6
			endoptions
		}
		if ! main.ck_factor_eq_6 {
			varlist [main.vl_independent_6]
			beginoptions
				option main.ck_noconstant_6
				optionarg main.cb_cov_structure_6
			endoptions
		}
	}
END

PROGRAM equation_7_output
BEGIN
	if main.ck_equation_7 {
		put " " "|| "
		require main.vn_level_7
		put main.vn_level_7 ": "
		if main.ck_factor_eq_7 {
			require main.vn_factor_eq_7
			put "R."
			put main.vn_factor_eq_7
			beginoptions
				optionarg main.cb_fcov_structure_7
			endoptions
		}
		if ! main.ck_factor_eq_7 {
			varlist [main.vl_independent_7]
			beginoptions
				option main.ck_noconstant_7
				optionarg main.cb_cov_structure_7
			endoptions
		}
	}
END

PROGRAM equation_8_output
BEGIN
	if main.ck_equation_8 {
		put " " "|| "
		require main.vn_level_8
		put main.vn_level_8 ": "
		if main.ck_factor_eq_8 {
			require main.vn_factor_eq_8
			put "R."
			put main.vn_factor_eq_8
			beginoptions
				optionarg main.cb_fcov_structure_8
			endoptions
		}
		if ! main.ck_factor_eq_8 {
			varlist [main.vl_independent_8]
			beginoptions
				option main.ck_noconstant_8
				optionarg main.cb_cov_structure_8
			endoptions
		}
	}
END

PROGRAM equation_9_output
BEGIN
	if main.ck_equation_9 {
		put " " "|| "
		require main.vn_level_9
		put main.vn_level_9 ": "
		if main.ck_factor_eq_9 {
			require main.vn_factor_eq_9
			put "R."
			put main.vn_factor_eq_9
			beginoptions
				optionarg main.cb_fcov_structure_9
			endoptions
		}
		if ! main.ck_factor_eq_9 {
			varlist [main.vl_independent_9]
			beginoptions
				option main.ck_noconstant_9
				optionarg main.cb_cov_structure_9
			endoptions
		}
	}
END

PROGRAM equation_10_output
BEGIN
	if main.ck_equation_10 {
		put " " "|| "
		require main.vn_level_10
		put main.vn_level_10 ": "
		if main.ck_factor_eq_10 {
			require main.vn_factor_eq_10
			put "R."
			put main.vn_factor_eq_10
			beginoptions
				optionarg main.cb_fcov_structure_10
			endoptions
		}
		if ! main.ck_factor_eq_10 {
			varlist [main.vl_independent_10]
			beginoptions
				option main.ck_noconstant_10
				optionarg main.cb_cov_structure_10
			endoptions
		}
	}
END

PROGRAM command
BEGIN
	allowxi
	INCLUDE _by_pr
	put "xtmixed "
	varlist main.vn_dv [main.vl_iv]
        if !main.vl_iv & main.ck_nocons {
	  stopbox stop `""Suppress constant term" is selected without independent variables""'
	}
	put " " /program ifin_output

	beginoptions
		put " " /program equation_1_output
		put " " /program equation_2_output
		put " " /program equation_3_output
		put " " /program equation_4_output
		put " " /program equation_5_output
		put " " /program equation_6_output
		put " " /program equation_7_output
		put " " /program equation_8_output
		put " " /program equation_9_output
		put " " /program equation_10_output

		option main.ck_nocons

		option est.rb_mle
		option est.ck_nstderr
		option est.ck_nolrtest

		optionarg /hidedefault rpt.sp_level
		option rpt.ck_noheader
		option rpt.ck_nogroup
		option rpt.rb_fixed
		option rpt.rb_random
		option rpt.rb_variance
		option rpt.ck_estmetric

		optionarg /hidedefault em.sp_emiter
		optionarg /hidedefault em.ed_emtol
		option em.ck_emonly
		option em.rb_nolog
		option em.rb_emlog
		option em.rb_emdots

		put " " /program max_output
	endoptions

END