event_fun: Return expected event number at interim analysis and final...

In DTEBOP2: Bayesian Optimal Phase II Randomized Clinical Trial Design with Delayed Outcomes

Return expected event number at interim analysis and final analysis.

Description

Based on the overall median times (median.1, median.2), the most likely separation timepoint, accrual rate and follow-up duration, this function will return the expected number of events in total at each interim analysis and final analysis based on the simulations.

Usage

event_fun(
  median.1,
  median.2,
  S_likely = (L + U)/2,
  n.interim,
  rate,
  FUP,
  n.sim = 1000,
  seed = NULL
)

Arguments

median.1	Numeric. The overall median survival time for SOC.
median.2	Numeric. The overall median survival time for the experimental arm.
S_likely	Numeric. The most likely separation time. Defaults to the midpoint of L and U.
n.interim	A vector of sample sizes per arm at each interim analysis. Each element except the last represents an interim sample size per arm. The final element is the total sample size N per arm.
rate	Numeric value. Patient accrual rate (e.g., patients per month).
FUP	Numeric value. Duration of follow-up. Default is 6 month/year in the context.
n.sim	Integer. Number of simulations to generate. Default is 1000.
seed	Optional integer. If provided, sets the seed for reproducibility.

Value

A data frame with two columns: the first column indicates the stage label, and the second column contains the expected number of events for each stage.

Examples

result <- event_fun(
median.1 = 2.8,
median.2 = 3.5,
S_likely = 2.1,
n.interim = c(28,40),
rate = 6,
FUP = 6
)

DTEBOP2 documentation built on June 8, 2025, 1:24 p.m.