Get a New Temporary Variable Name for a Dataset
Details
The function returns a new unique temporary variable name to be used inside
dataset
. The temporary variable names have the structure prefix_n
where
n
is an integer, e.g. tmp_var_1
. If there is already a variable inside
datset
with a given prefix
then the suffix is increased by 1, e.g. if
tmp_var_1
already exists then get_new_tmp_var()
will return tmp_var_2
.
Examples
library(dplyr, warn.conflicts = FALSE)
library(pharmaversesdtm)
data(dm)
tmp_var <- get_new_tmp_var(dm)
mutate(dm, !!tmp_var := NA)
#> # A tibble: 306 × 26
#> STUDYID DOMAIN USUBJID SUBJID RFSTDTC RFENDTC RFXSTDTC RFXENDTC RFICDTC
#> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr>
#> 1 CDISCPILOT01 DM 01-701-… 1015 2014-0… 2014-0… 2014-01… 2014-07… NA
#> 2 CDISCPILOT01 DM 01-701-… 1023 2012-0… 2012-0… 2012-08… 2012-09… NA
#> 3 CDISCPILOT01 DM 01-701-… 1028 2013-0… 2014-0… 2013-07… 2014-01… NA
#> 4 CDISCPILOT01 DM 01-701-… 1033 2014-0… 2014-0… 2014-03… 2014-03… NA
#> 5 CDISCPILOT01 DM 01-701-… 1034 2014-0… 2014-1… 2014-07… 2014-12… NA
#> 6 CDISCPILOT01 DM 01-701-… 1047 2013-0… 2013-0… 2013-02… 2013-03… NA
#> 7 CDISCPILOT01 DM 01-701-… 1057 NA NA NA NA NA
#> 8 CDISCPILOT01 DM 01-701-… 1097 2014-0… 2014-0… 2014-01… 2014-07… NA
#> 9 CDISCPILOT01 DM 01-701-… 1111 2012-0… 2012-0… 2012-09… 2012-09… NA
#> 10 CDISCPILOT01 DM 01-701-… 1115 2012-1… 2013-0… 2012-11… 2013-01… NA
#> # ℹ 296 more rows
#> # ℹ 17 more variables: RFPENDTC <chr>, DTHDTC <chr>, DTHFL <chr>, SITEID <chr>,
#> # AGE <dbl>, AGEU <chr>, SEX <chr>, RACE <chr>, ETHNIC <chr>, ARMCD <chr>,
#> # ARM <chr>, ACTARMCD <chr>, ACTARM <chr>, COUNTRY <chr>, DMDTC <chr>,
#> # DMDY <dbl>, tmp_var_1 <lgl>