Simulate data from multiple two-arm trials with an exponentially distributed time-to-event endpoint and one predictor of the intercurrent event

Simulate data from multiple two-arm trials with an exponentially distributed time-to-event endpoint and one predictor of the intercurrent event

Usage

sim_dat_mult_trials_exp_covar(n_iter, params)

Arguments

n_iter

Positive integer value, number of trials to be simulated.

params

List of data parameters as used in sim_dat_one_trial_exp_covar.

Value

A list of length n_iter, containing objects of class tibble(), each containing one simulated trial dataset.

See also

sim_dat_mult_trials_exp_nocovar()

Examples

d_params_covar <- list(
  n = 1000,        
  nt = 500,       
  prob_X1 = 0.4, 
  prob_ice_X1 = 0.5, 
  prob_ice_X0 = 0.2,
  fu_max = 336L,   
  prop_cens = 0.15,    
  T0T_rate = 0.2,     
  T0N_rate = 0.2,     
  T1T_rate = 0.15,     
  T1N_rate = 0.1
 )
dat_mult_trials <- sim_dat_mult_trials_exp_covar(
  n_iter = 3L,
  params = d_params_covar 
)
lapply(dat_mult_trials, dim)
head(dat_mult_trials[[1]])