fix handling of subpops from merge, modify vignette temporarily

CDCgov · Oct 25, 2024 · 4822fa0 · 4822fa0
1 parent 356e336
commit 4822fa0
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/R/get_stan_data.R b/R/get_stan_data.R
@@ -559,8 +559,8 @@ get_stan_data <- function(input_count_data,
     # This dist_matrix will not be used, only needed for stan data specs.
     dist_matrix <- matrix(
       0,
-      nrow = subpop_data$n_subpops - 1,
-      ncol = subpop_data$n_subpops - 1
+      nrow = length(ww_vals$subpop_pops) - 1,
+      ncol = length(ww_vals$subpop_pops) - 1
     )
   }
   if (!(corr_structure_switch %in% c(0, 1, 2))) {

diff --git a/vignettes/wwinference.Rmd b/vignettes/wwinference.Rmd
@@ -334,6 +334,7 @@ compile the model. This can be done using the `compile_model()` function
 
 
 ```{r compile-model}
+# temporarily compile from local to make troubleshooting faster/easier
 model <- wwinference::compile_model(
   model_filepath = here::here(file.path(
     "inst", "stan", "wwinference.stan"