library(knitr) opts_chunk$set(echo = TRUE, message = FALSE, error = FALSE, warning = FALSE, comment = "", fig.align = "center", out.width = "70%")
library(NCC)
The function datasim_cont()
enables data simulation of a platform trial with continuous endpoint and an arbitrary number of treatment arms entering at different time points.
period_blocks
, default=2)Paper | Software |
$N$ | n_total |
$K$ | num_arms |
$d$ | d |
$n$ | n_arm |
$\eta_0$ | mu0 |
$\theta$ | theta |
$\lambda$ | lambda |
$\sigma$ | sigma |
$N_p$ | N_peak |
The user specifies the number of treatment arms in the trial, the sample size per treatment arm (assumed equal) and the timing of adding arms in terms of patients recruited to the trial so far.
num_arms
Number of treatment arms in the trialn_arm
Sample size per arm (assumed equal)d
Vector with timings of adding new arms in terms of number of patients recruited to the trial so far (of length num_arms
)period_blocks
- number to multiply the number of active arms with in order to get the block size per period (block size = period_blocks
$\cdot$ #active arms)mu0
- response in the control arm. Default=0theta
- vector with treatment effects for each treatment arm (of length num_arms
)lambda
- vector with strength of time trend in each arm (of length num_arms+1
, as time trend in the control is also allowed)sigma
- residual variancetrend
- indicates the time trend pattern ("linear", "stepwise" or "inv_u")N_peak
- point at which the inverted-u time trend switches direction in terms of overall sample sizefull
- Boolean. Indicates whether the full dataset should be returned. Default=FALSE
Per default (using full=FALSE
), the function outputs a dataframe with simulated trial data needed for the analysis. If the parameter full
is set to TRUE
, the output is a list containing an extended version of the dataframe (also including lambdas and underlying responses) and all input parameters.
# Dataset with trial data only (default) head(datasim_cont(num_arms = 3, n_arm = 100, d = c(0, 100, 250), theta = rep(0.25, 3), lambda = rep(0.15, 4), sigma = 1, trend = "linear"))
# Full dataset head(datasim_cont(num_arms = 3, n_arm = 100, d = c(0, 100, 250), theta = rep(0.25, 3), lambda = rep(0.15, 4), sigma = 1, trend = "linear", full = T)$Data)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.