opchar_adaptive: Determine the operating characteristics of adaptive two-stage...
In mjg211/singlearm: Design and analysis of single-arm clinical trials

Description Usage Arguments Details Value See Also Examples

opchar_adaptive() supports the simultaneous evaluation of the operating characteristics of multiple adaptive two-stage single-arm clinical trial designs for a single binary primary endpoint, determined using des_adaptive().

1	opchar_adaptive(des, ..., k, pi, summary = F)

`des`	An object of class `"sa_des_adaptive"`, as returned by `des_adaptive()`.
`...`	Additional objects of class `"sa_des_adaptive"`. These will be grouped in to a list named `"add_des"`.
`k`	Calculations are performed conditional on the trial stopping in one of the stages listed in vector `k`. Thus, `k` should be a vector of integers, with elements between one and two. If left unspecified, it will internally default to all possible stages.
`pi`	A vector of response probabilities to evaluate operating characteristics at. This will internally default to be the π₀ and π₁ from the supplied designs if it is left unspecified.
`summary`	A logical variable indicating whether a summary of the function's progress should be printed to the console.

Note that each of the supplied designs must have been designed for the same value of π₀.

For each value of pi) in the supplied vector pi), opchar_adaptive() evaluates the power, ESS, and other key characteristics, of each of the supplied designs.

Calculations are performed conditional on the trial stopping in one of the stages specified using the input (vector) k.

A list of class "sa_opchar_adaptive" containing the following elements

A tibble in the slot $opchar summarising the operating characteristics of the supplied designs.
Each of the input variables as specified, subject to internal modification.

des_adaptive, and their associated plot family of functions.

# Find the optimal adaptive design for the default parameters
des    <- des_adaptive()
# Find its operating characteristics for a range of possible response
# probabilities
opchar <- opchar_adaptive(des)