# NOT RUN {
## Simulate a dataset with 500 observations,
## where the biomarker is Normally distributed (with SD=1).
## The hazard ratio corresponding to every one unit of increament in the biomarker is 1.25.
## The observation period is 10 months,
## and the survival probability of the population at the end of observation is 0.5.
## Hazards are constant over time.
sim_obj <- sim_data(n = 500, biomarker = "normal", effect.size = 1.25,
baseline.hazard = "constant", end.time = 10, end.survival = 0.5)
dat <- sim_obj$data
# }
Run the code above in your browser using DataLab