
96 Appendix A3 Modelbase and OxPack
{
// set model class, and activate model formulation dialog
m_iModelClass = MC_COUNT;
"OxPackDialog"("OP_FORMULATE", 0, 0, 0);
return 0;
}
else if (sDialog == "OP_OPTIONS")
{
// append BprobitEx options to the Modelbase ones
decl adlg = Modelbase::SendDialog(sDialog);
adlg ~=
{ { "Further options", CTL_GROUP, 1 },
{ "Use unweighted covariance matrix",
CTL_CHECK, m_fCovarUnweighted, "covunw" }
};
return adlg;
}
else if (sDialog == "OP_SETTINGS")
{
// settings: choose model specific settings
// depends on the model class
if (m_iModelClass == MC_BINARY)
return
{ { "Choose a model:" },
{ "Logit", CTL_RADIO,
m_iMethod == M_PROBIT ? 1 : 0, "method" },
{ "Probit", CTL_RADIO }
};
else if (m_iModelClass == MC_COUNT)
return
{ { "Choose a model:" },
{ "Poisson", CTL_RADIO,
m_iMethod == M_NEGBIN ? 1 : 0, "method" },
{ "Negative binomial", CTL_RADIO }
};
}
else if (sDialog == "OP_TEST_GRAPHICS")
{
return
{ { "Graphic Analysis" },
{ "Histograms of probabilities for each state",
CTL_CHECK, 1, "hist" },
{ "Histograms of probabilities of observed state",
CTL_CHECK, 1, "histobs" },
{ "Number of bars:", CTL_INT, 10, "bars" },
{ "Cumulative correct predictions for each state",
CTL_CHECK, 0, "ccp" },
{ "Unsorted", CTL_RADIO, 1, "sort" },
{ "Sorted by probability", CTL_RADIO },
{ "Sorted by log-likelihood contribution", CTL_RADIO },
{ "Cumulative response for each state",
CTL_CHECK, 0, "crf" }
};
Komentarze do niniejszej Instrukcji