secondaryBoundary: Calculate the Refined Secondary Boundaries, Standard OBF and...

In gsrsb: Group Sequential Refined Secondary Boundary

Calculate the Refined Secondary Boundaries, Standard OBF and POC

Description

Calculate the standard O'Brien-Fleming and Pocock refined secondary boundaries

Usage

secondaryBoundary(alpha, tVec, cvec, locPeak, type = 2, initIntvl = c(1, 4))

Arguments

alpha	type I error.
tVec	information vector.
cvec	primary group sequential boundary.
locPeak	location of maximum, a number between 1 and the number of interims.
type	type of the test procedure for the secondary endpoint. O'Brien- Fleming (OBF) type error spending funciton is 1, Pocock (POC) type error spending funciton is 2.
initIntvl	computing paramter, a pair of numbers containing the end-points of the interval to be searched for the root.

Details

This function calculates the standard (origiinal) O'Brien-Fleming (OBF) and Pocock (POC) refined secondary boundaries.

Value

standard O'Brien-Fleming and Pocock refined secondary boundaries.

Author(s)

Jiangtao Gou

References

O'Brien, P. C., and Fleming, T. R. (1979). A multiple testing procedure for clinical trials. Biometrics 35, 549-556.

Pocock, S. J. (1977). Group sequential methods in the design and analysis of clinical trials. Biometrika 64, 191-199.

Tamhane, A. C., Gou, J., Jennison, C., Mehta, C. R., and Curto, T. (2017+). A gatekeeping procedure to test a primary and a secondary endpoint in a group sequential design with multiple interim looks. Biometrics, 74, 40-48.

See Also

ldSecondaryBoundary, initLocBeak

Examples

## Not run: 
require(mvtnorm)
K <- 8
gammaVec <- sqrt((1:K)/K)
tVec <- gammaVec^2
alpha = 0.025
c <- 2.072274
cvec <- c/gammaVec
loc <- initLocPeak(alpha,tVec,cvec,type=2,initIntvl=c(1,4))
sbvec <- secondaryBoundary(alpha,tVec,cvec,loc,type=2,
       initIntvl=c(1,8))

## End(Not run)

gsrsb documentation built on July 9, 2023, 6:02 p.m.