sBoundsPh2: Critical boundaries for the secondary endpoint in the...

In triggerstrategy: Trigger Strategy in Clinical Trials

Critical boundaries for the secondary endpoint in the partially hierarchical group sequential design

Description

This function computes the critical boundaries for the secondary endpoint in the partially hierarchical group sequential design.

Usage

sBoundsPh2(
  alpha,
  alpha0,
  t0,
  t1,
  tc0 = t0,
  tc1 = t1,
  rho = 0,
  iuse0 = 1,
  iuse1h = 1,
  iuse1t = 1,
  phi0 = rep(1, length(alpha)),
  phi1h = rep(1, length(alpha)),
  phi1t = rep(1, length(alpha))
)

Arguments

alpha	a value of overall type I error rate
alpha0	a value of the type I error rate for testing H0
t0	a vector of information times for H0
t1	a vector of information times for H1
tc0	a vector of calendar times for H0
tc1	a vector of calendar times for H1
rho	a value of the correlation between the test statistics for H0 and H1.
iuse0	a value of the type of error spending function for H0, ranging from 1 to 4
iuse1h	a value of the type of error spending function for H1 first half, ranging from 1 to 4
iuse1t	a value of the type of error spending function for H1 second half, ranging from 1 to 4
phi0	a value of the parameter of error spending function for H0
phi1h	a value of the parameter of error spending function for H1 first half
phi1t	a value of the parameter of error spending function for H1 second half

Value

a list of two vectors: bd critical boundaries, er error spent until each stage

Author(s)

Jiangtao Gou

References

Gou, J. (2023). Trigger strategy in repeated tests on multiple hypotheses. Statistics in Biopharmaceutical Research, 15(1), 133-140. Gou, J. (2022). Sample size optimization and initial allocation of the significance levels in group sequential trials with multiple endpoints. Biometrical Journal, 64(2), 301-311.

Examples

alpha <- 0.05
alpha0 <- 0.03
iuse0 <- 4
iuse1h <- 4
iuse1t <- 4
phi0 <- -4
phi1h <- 1
phi1t <- 1
tc0 <- c(3,6,9,12)
tc1 <- c(6,12,18,24)
t0 <- c(0.3,0.6,0.9,1)
t1 <- (1:4)/4
rho <- 0
sBoundsPh2(alpha, alpha0,
    t0, t1, tc0, tc1,
    rho, iuse0, iuse1h, iuse1t,
    phi0, phi1h, phi1t)
alpha <-  0.025
alpha0 <- 0.01
iuse0 <- 4
iuse1 <- 4
phi0 <- -4
phi1 <- -4
tc0 <- c(3,6,9,12,18)
tc1 <- c(6,12,18,36)
t0 <- (1:5)/5
t1 <- (1:4)/4
rho <- 0.0;
sBoundsPh2(alpha, alpha0,
    t0, t1, tc0, tc1,
    rho, iuse0, iuse1h=iuse1, iuse1t=iuse1,
    phi0, phi1h=phi1, phi1t=phi1)

triggerstrategy documentation built on July 9, 2023, 5:25 p.m.