medianConsistentlyOne function

Find the lowest population probability whose median is consistently one This is the lowest estimate for Sens that is consistently (over 5 runs) most likely to yield a sample estimate that is all 1's (e.g. 100/100, etc.).

medianConsistentlyOne(pr, size, R, nConsistentRuns = 5, warn = TRUE,
  consistentQuantile = 0.5)

Arguments

• pr: Probability input.
• size: Number of trials.
• R: number of bootstrap replications.
• nConsistentRuns: Number of runs that all have to be identical to return TRUE.
• warn: Warn if searching outside of the range c(0,1).
• consistentQuantile: Defaults to 0.5 (the median). Change if we want to use a different criterion for consistency than the median

Returns

Boolean of length one (TRUE or FALSE).

Examples

## Not run:

prs <- seq(.990,.995,.0001)
bools <- sapply( prs, medianConsistentlyOne, size=truePos, R=R )
data.frame( prs, bools )
## End(Not run)