R/truncation_points.R

In adviksh/winfer:

Defines functions conditional_truncation_points

Documented in conditional_truncation_points

#' Truncation Point for Given Ranks
#' @inheritParams ci_docs
#'
conditional_truncation_points <- function(estimates) {
  max(estimates[-which.max(estimates)])
}