From 8b33169d4a9afb56a93b4b73992f1014e22aa513 Mon Sep 17 00:00:00 2001 From: jamesaazam Date: Tue, 30 Jan 2024 16:35:45 +0000 Subject: [PATCH] Use new function name --- R/simulate.r | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/simulate.r b/R/simulate.r index 7bc4c893..b734c0ee 100644 --- a/R/simulate.r +++ b/R/simulate.r @@ -464,7 +464,7 @@ simulate_summary <- function(index_cases, # Adjust next_gen if the number of offspring is greater than the # susceptible population. if (sum(next_gen) > susc_pop) { - next_gen <- adjust_next_gen( + next_gen <- .adjust_next_gen( next_gen = next_gen, susc_pop = susc_pop )