R/simpact.params.boundaries.R

In wdelva/RSimpactHelp: Pre- and Post-simulation helper functions for RSimpact Cyan

#' These are the preset boundaries for most of the parameters that are likely
#' to be calibrated in simpact.
#' Most of these parameters will be standard
#' in \code{\link{simpact.config.inputs}} stage.
#' The user can set the simulation specific parameters as needed
#'
#' @param ... is to return all the parameters used
#' during the \code{\link{simpact.config.inputs}} setup.
#' @return a list of boundaries of parameters to be calibrated
#' @examples
#' varied.params.bound <- simpact.params.boundaries()[[1]]
#' @export

simpact.params.boundaries <- function(...){

  arg.list <- list(conception.alpha_base =  c(-4, -1.5), #c(-3.6, -1.2),
                   person.art.accept.threshold.dist.fixed.value = c(0.55, 0.99),
                   person.eagerness.man.dist.gamma.a =  c(0.6, 1.9), #c(0.1, 2),
                   person.eagerness.man.dist.gamma.b =  c(30, 90), #c(5, 60),
                   person.eagerness.woman.dist.gamma.a =  c(0.6, 1.9), #c(0.5, 2),
                   formation.hazard.agegapry.eagerness_diff =  c(-0.06, 0), #c(-0.1, 0),
                   person.eagerness.woman.dist.gamma.b =  c(20, 60), #c(5, 60),
                   formation.hazard.agegapry.numrel_man = c(-1, -0.1),
                   formation.hazard.agegapry.numrel_woman = c(-1.8, -0.8),
                   formation.hazard.agegapry.gap_factor_man_exp = c(-1.5, -0.2),
                   formation.hazard.agegapry.gap_factor_woman_exp = c(-1.8, -0.4),
                   person.agegap.man.dist.normal.mu =   c(3, 7), #c(0, 6),
                   person.agegap.woman.dist.normal.mu =  c(0.5 ,4), #c(0, 6),
                   person.agegap.man.dist.normal.sigma =  c(1, 4), #c(0.5, 2),
                   person.agegap.woman.dist.normal.sigma = c(0.7, 1), #c(0.5, 2)
                   ...)

  return(arg.list)
}