# 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.).

### Description

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.).

### Usage

1 2 | ```
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 |

### Value

Boolean of length one (TRUE or FALSE).

### Examples

1 2 3 4 5 6 | ```
## Not run:
prs <- seq(.990,.995,.0001)
bools <- sapply( prs, medianConsistentlyOne, size=truePos, R=R )
data.frame( prs, bools )
## End(Not run)
``` |

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker. Vote for new features on Trello.