2024-11-30 update : update.

CDCgov · Nov 30, 2024 · 8f4b46b · 8f4b46b
1 parent dd48116
commit 8f4b46b
Showing 1 changed file with 25 additions and 0 deletions.
diff --git a/vignettes/spatial_wwinference.Rmd b/vignettes/spatial_wwinference.Rmd
@@ -444,7 +444,32 @@ ww_data_full <- rbind(
       )
     )
   )
+ww_data_eval_full <- rbind(
+  simulated_data_iid$ww_data_eval %>%
+    mutate(model_type = "IID"),
+  simulated_data_exp$ww_data_eval %>%
+    mutate(model_type = "Exponential"),
+  simulated_data_rng_corr_mat$ww_data_eval %>%
+    mutate(model_type = "Rand. Corr. Matrix")
+) %>%
+  mutate(
+    model_type = factor(
+      model_type,
+      levels = c(
+        "IID",
+        "Exponential",
+        "Rand. Corr. Matrix"
+      )
+    )
+  )
 ww_data_plot <- ggplot(ww_data_full) +
+  geom_point(
+    data = ww_data_eval_full, aes(
+      x = date,
+      y = log_genome_copies_per_ml_eval
+    ),
+    shape = 21, color = "black", fill = "white"
+  ) +
   geom_point(
     aes(
       x = date, y = log_genome_copies_per_ml