Calculate the likelihood)
likelihood(
params,
modelObj,
type = c("likelihood", "likelihood.i", "deviance", "deviance.i", "resid", "robust")
)the parameter vector
the model object constructed by mtre
character,if "likelihood" = returns log-likelihood , "likelihood.i" = returns log-likelihood components , if "deviance" = returns deviance , if "deviance.i" = returns deviance components , if "resid" = returns score residuals, if 'robust' = returns components for the calculation of robust standard errors