knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.width = 7, fig.height = 5, fig.fullwidth = TRUE )
library(mmmTMB)
# Data data_list <- sim_data # Parameters parameters_list <- NULL # Settings settings_list <- mmmSet( error_family = 0, nlminb_loops = 5, newton_iters = 5, openmp_cores = 6) # Fit fit <- mmmFit( data = data_list, parameters = parameters_list, settings = settings_list, control = mmmControl(trace = 5) ) # Inspect results fit$results
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.