From 6f1044ac66207121dd1afe8b067083db3ec54258 Mon Sep 17 00:00:00 2001
From: sbidari <zib2@cdc.gov>
Date: Fri, 10 Jan 2025 09:38:33 -0500
Subject: [PATCH] only include designated models in the webpage

---
 src/get_webtext.R | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/get_webtext.R b/src/get_webtext.R
index 58b83b7..9045cd1 100644
--- a/src/get_webtext.R
+++ b/src/get_webtext.R
@@ -39,7 +39,9 @@ contributing_teams <- readr::read_csv(
     reference_date, "-models-submitted-to-hub.csv"
   )),
   show_col_types = FALSE
-)
+) |>
+  dplyr::filter(Designated_Model)
+
 weekly_submissions <- hubData::load_model_metadata(
   hub_path,
   model_ids = contributing_teams$Model