## File Name: amh_loglike.R
## File Version: 0.07
#########################################################
# evaulate log-likelihood for amh fit
amh_loglike <- function( model, data, pars){
ll <- do.call( model, list( pars=pars, data=data ) )
return(ll)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.