From 1fda5853ce31153aaca26056d595e406a9f89603 Mon Sep 17 00:00:00 2001 From: RJSheppard Date: Tue, 16 Jul 2024 17:35:04 +0100 Subject: [PATCH] Default average age is currently 7663. The deterministic model average age is 7665, which seems to make more sense (7665/365=21). --- R/parameters.R | 4 ++-- man/get_parameters.Rd | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/R/parameters.R b/R/parameters.R index fa5bf1af..3319402c 100644 --- a/R/parameters.R +++ b/R/parameters.R @@ -30,7 +30,7 @@ #' #' * human_population - the initial number of humans to model; default = 100 #' * average_age - the average age of humans (in timesteps), this is only used -#' if custom_demography is FALSE; default = 7663 +#' if custom_demography is FALSE; default = 7665 #' * custom_demography - population demography given; default = FALSE #' #' initial immunity values: @@ -281,7 +281,7 @@ get_parameters <- function(overrides = list()) { du = 110, # human demography parameters human_population = 100, - average_age = 7663, + average_age = 7665, custom_demography = FALSE, # initial immunities init_ica = 0, diff --git a/man/get_parameters.Rd b/man/get_parameters.Rd index a71a44d4..955b6910 100644 --- a/man/get_parameters.Rd +++ b/man/get_parameters.Rd @@ -34,7 +34,7 @@ human demography parameters: \itemize{ \item human_population - the initial number of humans to model; default = 100 \item average_age - the average age of humans (in timesteps), this is only used -if custom_demography is FALSE; default = 7663 +if custom_demography is FALSE; default = 7665 \item custom_demography - population demography given; default = FALSE }