Function to generate random Time-to-Safety Event Dataset for a given Subject-Level Analysis Dataset.
Examples
adsl <- radsl(N = 10, seed = 1, study_duration = 2)
adsaftte <- radsaftte(adsl, seed = 2)
adsaftte
#> # A tibble: 90 × 66
#> STUDYID USUBJID SUBJID SITEID AGE AGEU SEX RACE ETHNIC COUNTRY DTHFL
#> <chr> <chr> <chr> <chr> <int> <fct> <fct> <fct> <fct> <fct> <fct>
#> 1 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 2 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 3 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 4 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 5 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 6 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 7 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 8 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 9 AB12345 AB12345-B… id-9 BRA-1 35 YEARS F BLAC… UNKNO… BRA N
#> 10 AB12345 AB12345-B… id-8 BRA-9 31 YEARS F ASIAN NOT H… BRA Y
#> # ℹ 80 more rows
#> # ℹ 55 more variables: INVID <chr>, INVNAM <chr>, ARM <fct>, ARMCD <fct>,
#> # ACTARM <fct>, ACTARMCD <fct>, TRT01P <fct>, TRT01A <fct>, TRT02P <fct>,
#> # TRT02A <fct>, REGION1 <fct>, STRATA1 <fct>, STRATA2 <fct>, BMRKR1 <dbl>,
#> # BMRKR2 <fct>, ITTFL <fct>, SAFFL <fct>, BMEASIFL <fct>, BEP01FL <fct>,
#> # AEWITHFL <fct>, RANDDT <date>, TRTSDTM <dttm>, TRTEDTM <dttm>,
#> # TRT01SDTM <dttm>, TRT01EDTM <dttm>, TRT02SDTM <dttm>, TRT02EDTM <dttm>, …