Skip to content

Commit

Permalink
[skip style] [skip vbump] Restyle files
Browse files Browse the repository at this point in the history
  • Loading branch information
github-actions[bot] committed Sep 28, 2024
1 parent f775d7d commit ad527a6
Showing 1 changed file with 4 additions and 1 deletion.
5 changes: 4 additions & 1 deletion R/radab.R
Original file line number Diff line number Diff line change
Expand Up @@ -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)]

Expand Down

0 comments on commit ad527a6

Please sign in to comment.