update ppc-calibration with consistency and confidence method

Author: Florence Bockting

DESCRIPTION

@@ -56,7 +56,10 @@ Suggests:
     shinystan (>= 2.3.0),
     survival,
     testthat (>= 2.0.0),
-    vdiffr (>= 1.0.2)
+    vdiffr (>= 1.0.2),
+    monotone,
+    patchwork,
+    brms
 RoxygenNote: 7.3.2
 VignetteBuilder: knitr
 Encoding: UTF-8

NAMESPACE

@@ -120,7 +120,10 @@ export(ppc_bars_data)
 export(ppc_bars_grouped)
 export(ppc_boxplot)
 export(ppc_calibration)
+export(ppc_calibration_data)
 export(ppc_calibration_grouped)
+export(ppc_calibration_interval_data)
+export(ppc_calibration_interval_data_grouped)
 export(ppc_calibration_overlay)
 export(ppc_calibration_overlay_grouped)
 export(ppc_data)

R/helpers-ppc.R

@@ -101,7 +101,7 @@ validate_predictions <- function(predictions, n_obs = NULL) {
 #' Validate PIT
 #'
 #' Checks that `pit` is numeric, doesn't have any NAs, and is either a vector,
-#' or a 1-D array with values in [0,1].
+#' or a 1-D array with values in `[0,1]`.
 #'
 #' @param pit The 'pit' object from the user.
 #' @return Either throws an error or returns a numeric vector.
@@ -521,8 +521,8 @@ get_interpolation_values <- function(N, K, L, prob) {
 #' within the bounds until z1 and takes the value in x1 at z1.
 #' @param x1 Vector of scaled ECDF values at the left end of the interval, z1.
 #' @param x2 Vector of scaled ECDF values at the right end of the interval, z2.
-#' @param z1 Left evaluation point in [0,1]
-#' @param z2 Right evaluation point in [0,1] with z2 > z1.
+#' @param z1 Left evaluation point in `[0,1]`
+#' @param z2 Right evaluation point in `[0,1]` with z2 > z1.
 #' @param N Total number of values in the sample.
 #' @return A vector containing the probability to transitioning from the values
 #' in x1 to each of the values in x2 weighted by the probabilities in p_int.