R/parci.R

In quickpsy: Fits Psychometric Functions for Multiple Groups

#' Calculates the confidence intervals for the parameters
#' \code{parci} calculates the confidence intervals for the parameters
#' @keywords internal
#' @export
parci <- function(qp, ci = .95) {
  qp$parbootstrap %>%
    group_by(pick(all_of(c(qp$groups, "parn")))) %>%
    do(one_parci(., ci))
}