From 0dda4a38665ae992b4f3bf42f2657638450a5d89 Mon Sep 17 00:00:00 2001 From: saraloo <45245630+saraloo@users.noreply.github.com> Date: Wed, 31 Jul 2024 08:56:26 +1000 Subject: [PATCH] remove date filtering --- flepimop/R_packages/inference/R/inference_slot_runner_funcs.R | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/flepimop/R_packages/inference/R/inference_slot_runner_funcs.R b/flepimop/R_packages/inference/R/inference_slot_runner_funcs.R index 117eb15c5..a708b2460 100644 --- a/flepimop/R_packages/inference/R/inference_slot_runner_funcs.R +++ b/flepimop/R_packages/inference/R/inference_slot_runner_funcs.R @@ -51,8 +51,7 @@ aggregate_and_calc_loc_likelihoods <- function( ## Filter to this location dplyr::filter( modeled_outcome, - !!rlang::sym(obs_subpop) == location #, - #date %in% unique(obs$date[obs$subpop == location]) + !!rlang::sym(obs_subpop) == location ) %>% ## Reformat into form the algorithm is looking for inference::getStats(