MNlogitf or MNdogitf returns log-likelihood(LL) expression for discrete equations of "logit" or "dogit" model.
MNlogitf
or MNdogitf
returns log-likelihood(LL) expression for discrete equations of "logit" or "dogit" model.
MNlogitf(ffor, transform = FALSE, separatenmm = FALSE, weight_disc = FALSE) MNdogitf( ffor, transform = FALSE, separatenmm = FALSE, weight_disc = FALSE, ppardogit = NULL )
ffor |
Discrete choice equations. |
transform |
if |
separatenmm |
if |
weight_disc |
if |
ppardogit |
"dogit" parameters only used in MNdogitf |
formula |
simplified LL for each equation or joint |
probs |
probability expression unsimplified |
expr |
LL string simplified |
formulat |
unsimplified log(P), only if transform is TRUE |
probt |
unsimplified P with quantile transformation qnorm(ifelse(P)), only if transform is TRUE |
expreteso |
unsimplified pnorm((qnorm(P)-mean)/sd), only if transform is TRUE |
probte |
qnorm(P) |
tval |
If quantile transformation is applied |
sume |
Denominator of logit probability |
MNlogitf
: returns log-likelihood(LL) expression for discrete equations of "logit" model.
MNdogitf
: returns log-likelihood(LL) expression for discrete equations of "dogit" model.
eq_d <- c("ASC1 * 1 + B11_dur * dur_1" , "ASC2 * 1 + B12_dur * dur_2", "ASC3 * 1 + B13_dur * dur_3 + B20_cost * cost_3 + B53_parkman * PbAvl_3", "ASC4 * 1 + B14_dur * dur_4 + B20_cost * cost_4 + B34_serv * servIdx_4 + B44_stop * stopUs1R1_4") parl <- c(paste0("ASC", 1:4), paste0("B1", 1:4, "_dur"), "B20_cost", "B53_parkman", "B34_serv", "B44_stop") disc_par <- get_par(parl, eq_d) ffor <- disc_par$cheqs0 res_l <- MNlogitf(ffor, separatenmm=FALSE, transform=FALSE) res_d <- MNdogitf(ffor, separatenmm=FALSE, transform=FALSE)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.