opchar_fixed: Determine the operating characteristics of single-stage...

Description Usage Arguments Details Value References See Also Examples

View source: R/opchar_fixed.R

Description

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

Usage

1
opchar_fixed(des, ..., pi, summary = F)

Arguments

des

An object of class "sa_des_fixed", as returned by des_fixed().

...

Additional objects of class "sa_des_fixed". These will be grouped in to a list named "add_des".

pi

A vector of response probabilities to evaluate operating characteristics at. This will internally default to be π0 and the π1 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.

Details

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

For each value of π in the supplied vector π (pi), opchar_fixed() evaluates the power of each of the supplied designs. Additional operating characteristics are also returned for convenience, specifically to simplify combining the output with that from other opchar_###() functions.

Value

A list of class "sa_opchar_fixed" containing the following elements

References

A'Hern RP (2001) Sample size tables for exact single-stage phase II designs. Statistics in Medicine 20:859-66.

Fleming TR (1982) One-sample multiple testing procedure for phase II clinical trials. Biometrics 38:143-51.

See Also

des_fixed, est_fixed, pval_fixed, ci_fixed, and their associated plot family of functions.

Examples

1
2
3
4
5
6
7
8
9
# Find the optimal single-stage design for the default parameters
des         <- des_fixed()
# Determine operating characteristics for a range of response probabilities
opchar      <- opchar_fixed(des, pi = seq(0, 1, 0.01))
# Find the optimal single-stage design for a 10% type-I error rate
des_10      <- des_fixed(alpha = 0.1)
# Determine operating characteristics for both designs at the same time
opchar_both <- opchar_fixed(des, des_10,
                            pi = seq(0, 1, 0.01))

mjg211/singlearm documentation built on May 8, 2021, 3:17 a.m.