From a172a82a7186ae2501d4a51f7faed332784ddeec Mon Sep 17 00:00:00 2001 From: Kyle Belanger Date: Mon, 23 Jan 2023 07:22:09 -0500 Subject: [PATCH] Update 0-data_prep.R --- ML/0-data_prep.R | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/ML/0-data_prep.R b/ML/0-data_prep.R index ad4a7d2..d88d892 100644 --- a/ML/0-data_prep.R +++ b/ML/0-data_prep.R @@ -72,6 +72,13 @@ patients <- dplyr$tbl(db, "patients") %>% dplyr$select(-anchor_year, -anchor_year_group, -dod) %>% dplyr$collect() +admissions <- dplyr$tbl(db, "admissions") %>% + dplyr$select(subject_id, race, hadm_id) %>% + dplyr$collect() + + +admissions <- admissions %>% dplyr$mutate(dplyr$across(race, factor)) + # usable data set is using chart time as it appears # LIS uses different id's for groups of tests # BMP and CBC Results together