From 76915be85320c0fd49674724a4bdb9d65c4501f9 Mon Sep 17 00:00:00 2001 From: Linda Nab Date: Thu, 16 Nov 2023 18:00:12 +0000 Subject: [PATCH] sense check added pax users --- analysis/data_process.R | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/analysis/data_process.R b/analysis/data_process.R index cfbbe34..f26ed40 100644 --- a/analysis/data_process.R +++ b/analysis/data_process.R @@ -134,6 +134,12 @@ if (period == "ba1") { # only very few people treated with paxlovid --> exclude filter(treatment_paxlovid_prim == "Untreated") ) } +cat("Number of people excluded before but included now") +data_processed$grace5 %>% + filter(!is.na(paxlovid_covid_therapeutics)) %>% + select(treatment_paxlovid_prim, status_primary) %>% + table() %>% + print() ################################################################################ # 4 Save data