crisk.sim: Generate a cohort in a competing risks context
In survsim: Simulation of Simple and Complex Survival Data

Description Usage Arguments Details Value Author(s) References See Also Examples

Simulation of cohorts in a context of competing risks survival analysis including several covariates, individual heterogeneity and periods at risk prior and after the start of follow-up.

Competing risks analysis considers time-to-first-event and the event type, possibly subject to right censoring (Beyersmann et al., 2009)

1 2	crisk.sim(n, foltime, dist.ev, anc.ev, beta0.ev, dist.cens="weibull", anc.cens, beta0.cens, z=NULL, beta=NA, x=NA, nsit)

`n`	integer value indicating the desired size of the cohort to be simulated.
`foltime`	real number that indicates the maximum time of follow-up of the simulated cohort.
`dist.ev`	vector of arbitrary size indicating the time to event distributions, with possible values `weibull` for the Weibull distribution, `lnorm` for the log-normal distribution and `llogistic` for the log-logistic distribution.
`anc.ev`	vector of arbitrary size of real components containing the ancillary parameters for the time to event distributions.
`beta0.ev`	vector of arbitrary size of real components containing the β_0 parameters for the time to event distributions.
`dist.cens`	string indicating the time to censoring distributions, with possible values `weibull` for the Weibull distribution, `lnorm` for the log-normal distribution, `llogistic` for the log-logistic distribution and `unif` for the uniform distribution. If no distribution is introduced, the time to censoring is assumed to follow a Weibull distribution.
`anc.cens`	real number containing the ancillary parameter for the time to censoring distribution or the maximum in case of uniform distributed time to censoring.
`beta0.cens`	real number containing the β_0 parameter for the time to censoring distribution or the minimum in case of uniform distributed time to censoring.
`z`	list of vectors with three elements containing information relative to a random effect used in order to introduce individual heterogeneity. Each vector in the list refers to a possible competing risk, so the number of vectors must be equal to `nsit` or equal to 1 if the same random effect will be used for all the causes. The first element indicates the distribution: `"unif"` states for a uniform distribution, `"gamma"` states for a gamma distribution, `"exp"` states for an exponential distribution, `"weibull"` states for a Weibull distribution and `"invgauss"` states for an inverse gaussian distribution. The second and third elements indicates the minimum and maximum in the case of a uniform distribution (both must be positive) and the parameters in the case of the rest of distributions. Note that just one parameter is needed in the case of exponential distribution. Its default value is `NULL`, indicating that no individual heterogeneity is introduced.
`beta`	list of vectors indicating the effect of the corresponding covariate. The number of vectors in `beta` must match the number of covariates, and the length of each vector must match the number of events considered. Its default value is NA, indicating that no covariates are included.
`x`	list of vectors indicating the distribution and parameters of any covariate that the user needs to introduce in the simulated cohort. The possible distributions are `"normal"` for normal distribution, `"unif"` for uniform distribution and `"bern"` for Bernoulli distribution. Its default value is NA, indicating that no covariates are included. The number of vectors in `x` must match the number of vectors in `beta`. Each vector in `x` must contain the name of the distribution and the parameter(s), which are: the probability of success in the case of a Bernoulli distribution; the mean and the variance in the case of a `normal` distribution; and the minimum and maximum in the case of a `uniform` distribution.
`nsit`	Number of different events that a subject can suffer. It must match the number of distributions specified in `dist.ev`.

In order to get the function to work properly, the length of the vectors containing the parameters of the time to event and the number of distributions indicated in the parameter dist.ev must be the same.

An object of class mult.ev.data.sim. It is a data frame containing the events suffered by the corresponding subjects. The columns of this data frame are detailed below

`nid`	an integer number that identifies the subject.
`cause`	cause of the event corresponding to the follow-up time of the individual.
`time`	time until the corresponding event happens (or time to subject drop-out).
`status`	logical value indicating if the corresponding event has been suffered or not.
`start`	time at which the follow-up time begins for each event.
`stop`	time at which the follow-up time ends for each event.
`z`	Individual heterogeneity generated according to the specified distribution.
`x`	value of each covariate randomly generated for each subject in the cohort.

David Moriña, Universitat de Barcelona and Albert Navarro, Universitat Autònoma de Barcelona

Beyersmann J, Latouche A, Buchholz A, Schumacher M. Simulating competing risks data in survival analysis. Stat Med 2009 Jan 5;28(1):956-971.

survsim-package, accum, rec.ev.sim, mult.ev.sim, simple.surv.sim

### A cohort with 50 subjects, with a maximum follow-up time of 100 days and two 
### covariates, following Bernoulli distributions, and a corresponding beta of 
### 0.1698695 and 0.0007010932 for each event for the first covariate and a 
### corresponding beta of 0.3735146 and 0.5591244 for each event for the 
### second covariate. Notice that the time to censorship is assumed to follow a 
### log-normal distribution.

sim.data <- crisk.sim(n=50, foltime=100, dist.ev=c("lnorm","lnorm"),
anc.ev=c(1.479687, 0.5268302),beta0.ev=c(3.80342, 2.535374),dist.cens="lnorm",
anc.cens=1.242733,beta0.cens=5.421748,z=list(c("unif", 0.8,1.2), c("unif", 0.9, 1.5)), 
beta=list(c(0.1698695,0.0007010932),c(0.3735146,0.5591244)), 
x=list(c("bern", 0.381), c("bern", 0.564)), nsit=2)

summary(sim.data)

Loading required package: eha
Loading required package: survival
Loading required package: statmod

Number of subjects at risk 
----------------------------
  cause sub.risk
     1       50
     2       50


Number of events 
----------------------------
  cause num.events
     1          8
     2         40


Density of incidence 
----------------------------
  cause  dens.incid
     1 0.009944591
     2 0.049722956