R/thresholdsci.R

Defines functions thresholdsci

Documented in thresholdsci

#' Calculates the confidence intervals for the thresholds
#' \code{thresholdsci} calculates the confidence intervals for the thresholds
#' @keywords internal
#' @export
thresholdsci <- function(qp, ci = .95, method = 'percent') {
  if (length(qp$groups) == 0)
    one_thresholdsci(qp$thresholdsbootstrap, ci, method)
  else
    qp$thresholdsbootstrap %>% group_by_(.dots = qp$groups) %>%
      do(one_thresholdsci(., ci, method))
}

Try the quickpsy package in your browser

Any scripts or data that you put into this service are public.

quickpsy documentation built on Oct. 2, 2019, 5:03 p.m.