Update 0-data_prep.R
This commit is contained in:
parent
2ed99f1fee
commit
5d5f81d1c0
1 changed files with 1 additions and 1 deletions
|
@ -91,7 +91,7 @@ ds1 <- ds_bmp %>%
|
|||
dplyr$filter(!is.na(`50993`) & !is.na(`50995`)) %>%
|
||||
dplyr$left_join(patients, by = c("subject_id" = "subject_id")) %>%
|
||||
dplyr$mutate(dplyr$across(`51300`, ~dplyr$if_else(!is.na(.),`51300`,`51301`))) %>%
|
||||
dplyr$select(-`51301`, -hadm_id) %>%
|
||||
dplyr$select(-`51301`) %>%
|
||||
# dplyr$filter(dplyr$if_all(.fns = ~!is.na(.)))
|
||||
dplyr$filter(rowSums(is.na(.)) <= 3) #allows for 3 missing test
|
||||
|
||||
|
|
Loading…
Reference in a new issue