#277 imwg_vignette: arrange() within dervie_donfirmed_response()

pharmaverse · Jun 13, 2024 · e80ed81 · e80ed81
1 parent 026090b
commit e80ed81
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/vignettes/adrs_imwg.Rmd b/vignettes/adrs_imwg.Rmd
@@ -211,8 +211,7 @@ adrs <- adrs %>%
     date_imputation = "last",
     flag_imputation = "time"
   ) %>%
-  mutate(AVISIT = VISIT) %>%
-  arrange(USUBJID, ADTM)
+  mutate(AVISIT = VISIT)
 ```
 
 ```{r, echo=FALSE}
@@ -369,6 +368,7 @@ confirmation_period <- 84
 
 derive_confirmed_response <- function(datain) {
   data_adrs <- datain %>%
+    arrange(USUBJID, ADTM) %>%
     filter(AVALC != "NE") %>%
     group_by(USUBJID) %>%
     mutate(