From aedbeefdd4ab31485acaaf8f164e4bef411d568d Mon Sep 17 00:00:00 2001 From: Qi Liu Date: Sat, 28 Sep 2024 07:30:25 +0000 Subject: [PATCH] Remove comment out --- book/listings/pharmacokinetic/adal01.qmd | 9 --------- 1 file changed, 9 deletions(-) diff --git a/book/listings/pharmacokinetic/adal01.qmd b/book/listings/pharmacokinetic/adal01.qmd index 19660293f8..b4186ef4b4 100644 --- a/book/listings/pharmacokinetic/adal01.qmd +++ b/book/listings/pharmacokinetic/adal01.qmd @@ -55,15 +55,6 @@ adab_f1 <- adab_f %>% select(USUBJID, VISIT, NFRLT, ISTPT, AVAL_pk, R1800000, R1800001, RESULT1, RESULT2, ADASTAT1, ADASTAT2) %>% mutate(ADA = R1800000, NAB = R1800001) %>% select(-R1800000, -R1800001) -# %>% -# rename( -# RES_ADA = `ADA interpreted per sample result`, -# TES_ADA = `Treatment Emergent - Positive`, -# TU_ADA = `Antibody titer units`, -# RES_NAB = `NAB interpreted per sample result`, -# TES_NAB = `Treatment Emergent - Positive, Neutralizing Antibody`, -# TU_NAB = `Neutralizing Antibody titer units` -# ) # Find subject level ADA status adab_s <- adab_f1 %>% select(USUBJID, ADASTAT1, ADASTAT2) %>% filter(!is.na(ADASTAT1), !is.na(ADASTAT2))