get_UMVUE_GMS: Calculates the "uniformly minimal variance unbiased...

Description Usage Arguments References Examples

View source: R/zzz.R

Description

Calculates the "uniformly minimal variance unbiased estimator" (UMVUE) for the true response rate based on the approach of Grishick, Mosteller and Savage.

Usage

1
get_UMVUE_GMS(k, r1, n1, n)

Arguments

k

overall observed responses.

r1

critical value for the first stage.

n1

sample size for the first stage.

n

overall sample size.

References

Girshick MA, Mosteller F, and Savage LJ (1946): Unbiased estimates for certain binomial sampling problems with applications. Annals of Mathematical Statistics, 17(1):13-23.

Examples

1
2
3
4
5
6
7
#Calculate a Simon's two-stage design
design <- getSolutions()$Solutions[3,] #minimax-design for the default values.

#Assume 9 responses were observed in the whole trial.
k = 9

umvue <- get_UMVUE_GMS(k, design$r1, design$n1, design$n)

Example output

Loading required package: Rcpp

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