diff --git a/R/radab.R b/R/radab.R
index bf9b6456..b014bf86 100644
--- a/R/radab.R
+++ b/R/radab.R
@@ -387,7 +387,10 @@ radab <- function(adsl,
     ))
 
   # Carry over ARM and ACTARM for all records.
-  arm <- adab %>% filter(!is.na(ARM), !is.na(ACTARM)) %>% select(USUBJID, ARM, ACTARM) %>% distinct(.)
+  arm <- adab %>%
+    filter(!is.na(ARM), !is.na(ACTARM)) %>%
+    select(USUBJID, ARM, ACTARM) %>%
+    distinct(.)
   adab$ARM <- arm$ARM[match(adab$USUBJID, arm$USUBJID)]
   adab$ACTARM <- arm$ACTARM[match(adab$USUBJID, arm$USUBJID)]