get_r2_flex: Calculates the number of responses needed for the second...

Description Usage Arguments See Also Examples

View source: R/zzz.R

Description

Calculates the number of responses needed for the second stage of a Simon's two-stage design if the flexible extension is chosen in the planning phase.

Usage

1
get_r2_flex(ce, p0, n2)

Arguments

ce

conditional error for the second stage.

p0

probability for a response under the null hypothesis.

n2

sample size for the second stage.

See Also

getD_proportionally, getD_equally, getD_distributeToOne, getD_none

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
#Calculate a Simon's two-stage design
design <- getSolutions()$Solutions[3,] #minimax-design for the default values.
#Get the conditional error values using proportionally "rest"-alpha spending.
ce_df <- getD_proportionally(design, 0.05)
#Assume 5 responses were observed in the interim analysis.
ce <- ce_df[5+1,]$ce # conditional error for 5 responses is listed in the 6th row of "ce_df"
#Calculate the number of patients needed in the second stage.
n2 <- design$n - design$n1
r2 <- get_r2_flex(ce, design$p0, n2)
r2
#Assume 10 patients more should be recruited in the second stage.
#(This changes the number of needed responses.)
n2 <- n2 + 10
r2 <- get_r2_flex(ce, design$p0, n2)
r2

OneArmPhaseTwoStudy documentation built on May 2, 2019, 9:28 a.m.