📄 max_ml.idlg
字号:
/*
max_ml.idlg
*! VERSION 1.1.8 31mar2005
// SCRIPTS and PROGRAMS for external use
* SCRIPT max_ml_on
* SCRIPT max_internal_on
* SCRIPT max_internalFrom_on
* SCRIPT max_pa_on
* SCRIPT max_int_setPaVisible
* SCRIPT max_setDefaultNoLog
* SCRIPT max_int_setDefaultNoLog
* SCRIPT max_setDefaultDifficult
* SCRIPT max_setDefaultOPG
* SCRIPT max_setFromNotVisible
* SCRIPT max_int_setFromVisible
* SCRIPT max_setFromForShwinters
* SCRIPT max_setFromForHwinters
* SCRIPT max_setOptionSlogit // requires std_glm and _dlght 420
* SCRIPT max_from_disable
* SCRIPT max_from_enable
* SCRIPT max_technique_disable
* SCRIPT max_technique_enable
* SCRIPT max_int_setLTolNotAllowed
* SCRIPT max_disable
* SCRIPT max_enable
* PROGRAM max_output
* SCRIPT max_internal_enable
* SCRIPT max_internal_disable
*/
DIALOG max, tabtitle("Max options")
BEGIN
BUTTON bu_hlp _xsetbu _top _setbuwd ., ///
label("Maximize Help") ///
onpush(script max_hlp)
CHECKBOX ck_diff _lft _top 350 ., ///
option(difficult) ///
label("Use a different stepping algorithm in noconcave regions")
CHECKBOX ck_nodiff @ @ @ ., ///
option(nodifficult) ///
label("Do not use alternate optimization for difficult likelihoods")
// For max_internal
SPINNER sp_iter_i _lft _top _spwd ., ///
label("Maximum iterations") option(iterate) ///
min(0) max(16000) default(c(maxiter))
TEXT tx_iter_i _spsep @ _spr2 ., ///
label("Maximum iterations")
COMBOBOX cb_tech _lft _ms 95 ., ///
dropdown option(technique) ///
contents(technique_list) values(technique_val_list) ///
onselchangelist(robust_label_list)
DEFINE holdy @y
TEXT tx_tech +100 @ 140 ., ///
label("Optimization technique")
// Groupbox for max_internal Iteration log
GROUPBOX gb_ilog_i _lft +10 _cwd1 _ht6, ///
label("Iteration log")
DEFINE ilogy @y
// Options for population averaged model
// By default these are not visible.
GROUPBOX gb_pop_pa _lft _top _iwd _ht13, ///
label("Optimization options for population-averaged models")
SPINNER sp_iter_pa _ilft _ms _spwd ., ///
label("Maximum iterations") min(0) max(5000) default(100) ///
option(iterate)
TEXT tx_iter_pa _spsep @ _spr2b ., ///
label("Maximum iteration")
EDIT en_tol2_pa _lft2 @ _en7wd ., ///
label("Convergence criterion") option(tolerance) default(1e-6)
TEXT tx_tol2_pa _en7sep @ _spr2b ., ///
label("Convergence criterion")
GROUPBOX gb_iter_pa _ilft _ls _cwd2 _ht6, ///
label("Iteration log")
RADIO rb_log_pa _indent _ss _inwd ., ///
label("Show iteration log") first option(NONE)
RADIO rb_trace_pa @ _ss @ ., ///
label("Display estimates at each iteration") option(trace)
RADIO rb_nolog_pa @ _ss @ ., ///
label("Suppress iteration log") option(nolog) last
SPINNER sp_iter _lft2 holdy _spwd ., ///
label("Maximum iterations") option(iterate) ///
min(0) max(16000) default(c(maxiter))
TEXT tx_iter _spsep @ _spr2 ., ///
label("Maximum iterations")
GROUPBOX gb_ilog _lft _ls _cwd4_1 _ht4, ///
label("Iteration log")
DEFINE holdy @y
RADIO rb_log _indent _ss _inwd ., ///
label("Show") first option(NONE) ///
onclickon(program max_logging_check)
DEFINE cy @cy
DEFINE inty @y
RADIO rb_nolog @ _ss @ ., ///
label("Suppress") last option(nolog) ///
onclickon(program max_logging_check)
// This is for max_internal
RADIO rb_log_i @ holdy _cwd2 ., ///
label("Show log") first option(NONE)
RADIO rb_trace_i @ _ss @ ., ///
label("Show log and parameter vector") option(trace)
RADIO rb_nolog_i @ _ss @ ., ///
label("Suppress log") last option(nolog)
// These are copies that are used when the default is nolog
RADIO rb_nolog2 @ inty cy ., ///
label("Suppress") first option(NONE) ///
onclickon(program max_logging_check)
RADIO rb_log2 @ _ss @ ., ///
label("Show") last option(log) ///
onclickon(program max_logging_check)
// This is for max_internal
RADIO rb_nolog2_i @ holdy @ ., ///
label("Suppress log") first option(NONE)
RADIO rb_trace2_i @ _ss @ ., ///
label("Show log and parameter vector") option(trace)
RADIO rb_log2_i @ _ss @ ., ///
label("Show log") last option(log)
GROUPBOX gb_tol_i _lft2 ilogy _cwd1 _ht6, ///
label("Convergence tolerances")
EDIT ed_tol_i _ilft2 _ms _en7wd ., ///
label("Coefficient vector") option(tolerance) default(1e-4)
TEXT tx_tol_i _en7sep @ _en7r2b ., ///
label("Coefficient vector")
EDIT ed_ltol_i _ilft2 _ls _en7wd ., ///
label("Log likelihood") option(ltolerance) default(0)
TEXT tx_ltol_i _en7sep @ _en7r2b ., ///
label("Log likelihood")
GROUPBOX gb_log _lft4_2 holdy _comb4_1 _ht4, ///
label("Elements to display in the iteration log")
CHECKBOX ck_trace _indent _ss _cwd4_2 ., ///
label("Parameter") option(trace)
DEFINE holdy @y
CHECKBOX ck_grad @ _ss @ ., ///
label("Gradient") option(gradient)
CHECKBOX ck_show _ilft4_3 holdy @ ., ///
label("Steps") option(showstep)
CHECKBOX ck_hess @ _ss @ ., ///
label("Neg. Hessian") option("hessian")
CHECKBOX ck_shownr _ilft4_4 @ @ ., ///
label("HSG") option(shownrtolerance)
GROUPBOX gb_tol _lft _xls _iwd _ht8, ///
label("Convergence tolerances")
EDIT ed_tol _ilft _ss _en7wd ., ///
label("Coefficient vector") option(tolerance) default(1e-6)
TEXT tx_tol _en7sep @ _en7r2b ., ///
label("Coefficient vector")
EDIT ed_gtol 230 @ _en7wd ., ///
label("Gradient vector") option(gtolerance)
TEXT tx_gtol _en7sep @ _en7r2b ., ///
label("Gradient vector")
EDIT ed_ltol _ilft _ls _en7wd ., ///
label("Log likelihood") option(ltolerance) default(1e-7)
TEXT tx_ltol _en7sep @ _en7r2b ., ///
label("Log likelihood")
EDIT ed_nrtol 230 @ _en7wd ., ///
label("Hessian-scaled gradient (HSG)") option(nrtolerance) default(1e-5)
TEXT tx_nrtol _en7sep @ 185 ., ///
label("Hessian-scaled gradient (HSG)")
CHECKBOX ck_nonrtol _ilft _ls _ibwd ., ///
onclickon(script nonrtol) onclickoff(script nrtol) ///
option(nonrtolerance) ///
label("Disable use of the Hessian-scaled gradient [nonrtolerance]")
TEXT tx_from _lft _xls _iwd ., ///
label("Initial values: [see from() in -help maximize-]")
EDIT ed_from _lft _ss _iwd ., ///
label("Initial values") option(from)
EDIT ed_from1 @ @ 50 ., ///
numonly ///
label("First value of the starting values for the parameters")
EDIT ed_from2 +55 @ 50 ., ///
numonly ///
label("Second value of the starting values for the parameters")
EDIT ed_from3 +55 @ 50 ., ///
numonly ///
label("Third value of the starting values for the parameters")
// slogit options
CHECKBOX ck_initialize _lft _ls _comb3_2 _ht6, ///
label("Initial estimates") groupbox ///
onclickon(script max_estimate_init_on) ///
onclickoff(script max_estimate_init_off)
DEFINE holdy @y
RADIO rb_constant _indent _ss _inwd ., ///
label("Use default constant of min(1/2, 1/dimension)") first ///
option(initialize(constant))
RADIO rb_random @ _ss @ ., ///
label("Use random numbers between 0 and 1") ///
option(initialize(random))
RADIO rb_svd @ _ss @ ., ///
label("Use singular value decomposition") last ///
option(initialize(svd))
CHECKBOX ck_nonormal _lft3_03 holdy 190 _ht6, ///
label("Do not normalize the") option(nonormalize)
TEXT tx_nonormal _indent2 _vss 150 ., ///
label("numeric variables")
END
SCRIPT max_internal_hide
BEGIN
max.gb_ilog_i.hide
max.rb_log_i.hide
max.rb_trace_i.hide
max.rb_nolog_i.hide
max.rb_nolog2_i.hide
max.rb_trace2_i.hide
max.rb_log2_i.hide
max.sp_iter_i.hide
max.tx_iter_i.hide
max.gb_tol_i.hide
max.ed_tol_i.hide
max.tx_tol_i.hide
max.ed_ltol_i.hide
max.tx_ltol_i.hide
max.tx_from.hide
max.ed_from.hide
END
SCRIPT max_internal_show
BEGIN
max.gb_ilog_i.show
max.rb_log_i.show
max.rb_trace_i.show
max.rb_nolog_i.show
max.sp_iter_i.show
max.tx_iter_i.show
max.gb_tol_i.show
max.ed_tol_i.show
max.tx_tol_i.show
max.ed_ltol_i.show
max.tx_ltol_i.show
END
SCRIPT max_ml_hide
BEGIN
max.ck_diff.hide
max.ck_nodiff.hide
max.cb_tech.hide
max.tx_tech.hide
max.sp_iter.hide
max.tx_iter.hide
max.gb_ilog.hide
max.rb_log.hide
max.rb_nolog.hide
max.rb_nolog2.hide
max.rb_log2.hide
max.gb_log.hide
max.ck_trace.hide
max.ck_grad.hide
max.ck_hess.hide
max.ck_shownr.hide
max.ck_show.hide
max.gb_tol.hide
max.ed_tol.hide
max.tx_tol.hide
max.ed_gtol.hide
max.tx_gtol.hide
max.ed_ltol.hide
max.tx_ltol.hide
max.ed_nrtol.hide
max.tx_nrtol.hide
max.ck_nonrtol.hide
max.tx_from.hide
max.ed_from.hide
END
SCRIPT max_ml_show
BEGIN
max.ck_diff.show
max.cb_tech.show
max.tx_tech.show
max.sp_iter.show
max.tx_iter.show
max.gb_ilog.show
max.rb_log.show
max.rb_nolog.show
max.gb_log.show
max.ck_trace.show
max.ck_grad.show
max.ck_hess.show
max.ck_shownr.show
max.ck_show.show
max.gb_tol.show
max.ed_tol.show
max.tx_tol.show
max.ed_gtol.show
max.tx_gtol.show
max.ed_ltol.show
max.tx_ltol.show
max.ed_nrtol.show
max.tx_nrtol.show
max.ck_nonrtol.show
max.tx_from.show
max.ed_from.show
END
SCRIPT max_pa_hide
BEGIN
max.gb_pop_pa.hide
max.sp_iter_pa.hide
max.tx_iter_pa.hide
max.en_tol2_pa.hide
max.tx_tol2_pa.hide
max.gb_iter_pa.hide
max.rb_log_pa.hide
max.rb_trace_pa.hide
max.rb_nolog_pa.hide
max.bu_hlp.show
max.settabtitle "Max options"
END
SCRIPT max_int_setPaVisible
BEGIN
script max_pa_show
END
SCRIPT max_pa_show
BEGIN
max.gb_pop_pa.show
max.sp_iter_pa.show
max.tx_iter_pa.show
max.en_tol2_pa.show
max.tx_tol2_pa.show
max.gb_iter_pa.show
max.rb_log_pa.show
max.rb_trace_pa.show
max.rb_nolog_pa.show
max.bu_hlp.hide
max.settabtitle "Opt options"
END
SCRIPT max_slogit_option_hide
BEGIN
max.ck_initialize.hide
max.rb_constant.hide
max.rb_random.hide
max.rb_svd.hide
max.ck_nonormal.hide
max.tx_nonormal.hide
END
SCRIPT max_slogit_option_show
BEGIN
max.ck_initialize.show
max.rb_constant.show
max.rb_random.show
max.rb_svd.show
max.ck_nonormal.show
max.tx_nonormal.show
END
SCRIPT max_estimate_init_on
BEGIN
max.rb_constant.enable
max.rb_random.enable
max.rb_svd.enable
END
SCRIPT max_estimate_init_off
BEGIN
max.rb_constant.disable
max.rb_random.disable
max.rb_svd.disable
END
SCRIPT max_PREINIT
BEGIN
// for max_internal
create BOOLEAN max_isNoLTol
// These must be already be hidden when they are created
// so they are tested properly the first time.
max.rb_nolog2.hide
max.rb_log2.hide
script max_internal_hide
script max_pa_hide
script max_ml_show
END
SCRIPT max_POSTINIT
BEGIN
max.cb_tech.setvalue ""
max.cb_tech.withvalue max.cb_tech.setvalue "@"
max.ck_nodiff.hide
max.ed_from1.hide
max.ed_from2.hide
max.ed_from3.hide
script max_slogit_option_hide
END
PROGRAM disable_max_int
BEGIN
call max.sp_iter_i.disable
call max.tx_iter_i.disable
call max.gb_ilog_i.disable
call max.rb_nolog_i.disable
call max.rb_log_i.disable
call max.rb_nolog2_i.disable
call max.rb_trace2_i.disable
call max.rb_log2_i.disable
call max.rb_trace_i.disable
call max.gb_tol_i.disable
call max.ed_tol_i.disable
call max.tx_tol_i.disable
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -