From ad527a65c8149b0e2d99eaa6d6597ccc24dcaf05 Mon Sep 17 00:00:00 2001
From: github-actions <41898282+github-actions[bot]@users.noreply.github.com>
Date: Sat, 28 Sep 2024 07:27:56 +0000
Subject: [PATCH] [skip style] [skip vbump] Restyle files

---
 R/radab.R | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

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)]