mmkin(models, datasets, cores = round(detectCores()/2), cluster = NULL, ...)
mkinmod
objects.
mkinfit
.
cluster
argument is NULL
.
makeCluster
to be used for parallel
execution.
mkinfit
.
This function calls mkinfit
on all combinations of models and datasets
specified in its first two arguments.
mkinfit
objects that can be indexed using the model
and dataset names as row and column indices.
## Not run: # m_synth_SFO_lin <- mkinmod(parent = list(type = "SFO", to = "M1"), # M1 = list(type = "SFO", to = "M2"), # M2 = list(type = "SFO"), use_of_ff = "max") # # m_synth_FOMC_lin <- mkinmod(parent = list(type = "FOMC", to = "M1"), # M1 = list(type = "SFO", to = "M2"), # M2 = list(type = "SFO"), use_of_ff = "max") # # models <- list(SFO_lin = m_synth_SFO_lin, FOMC_lin = m_synth_FOMC_lin) # datasets <- lapply(synthetic_data_for_UBA_2014[1:3], function(x) x$data) # # time_default <- system.time(fits <- mmkin(models, datasets)) # time_1 <- system.time(fits.1 <- mmkin(models, datasets, cores = 1)) # # time_default # time_1 # # endpoints(fits[["SFO_lin", 2]]) # ## End(Not run)