From 88be44b5e1134d9c14f5e2664be56b05b7b70e25 Mon Sep 17 00:00:00 2001
From: Kyle Belanger <kyleb44@hotmail.com>
Date: Tue, 24 Jan 2023 08:00:12 -0500
Subject: [PATCH] Update 0-data_prep.R

---
 ML/0-data_prep.R | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/ML/0-data_prep.R b/ML/0-data_prep.R
index ad4a7d2..334a8e3 100644
--- a/ML/0-data_prep.R
+++ b/ML/0-data_prep.R
@@ -105,7 +105,9 @@ ds_final <- ds1 %>%
       ,TRUE ~ "Normal TSH"
     )
   ) %>%
+  dplyr$filter(ft4_dia != "Normal TSH") %>%
   dplyr$rename(!!!test_list_names) %>%
+  dplyr$select(-FT4) %>%
   dplyr$relocate(gender, anchor_age)
 
 # save data ---------------------------------------------------------------