diff --git a/data-raw/tr_onco_recist.R b/data-raw/tr_onco_recist.R index 0fae11d..c49bd34 100644 --- a/data-raw/tr_onco_recist.R +++ b/data-raw/tr_onco_recist.R @@ -172,6 +172,14 @@ suppress_warning( tr <- bind_rows(tr, tr_radio1, tr_radio2) %>% select(-diff_percent) %>% + mutate( + TRGRPID = if_else( + substr(TRLINKID, 1, 1) == "T", + "TARGET", + "NON-TARGET" + ), + .before = TRLINKID + ) %>% mutate( TREVAL = if_else(is.na(TREVALID), "INVESTIGATOR", "INDEPENDENT ASSESSOR"), .before = TREVALID, diff --git a/data/tr_onco_recist.rda b/data/tr_onco_recist.rda index 88b2534..044f522 100644 Binary files a/data/tr_onco_recist.rda and b/data/tr_onco_recist.rda differ