Skip to contents

Format a calibration

Usage

# S3 method for class 'qdm_calibration'
format(x, digits = 4L, ...)

Arguments

x

An object of class "qdm_calibration".

digits

Number of significant digits for numeric values.

...

Not used.

Value

A character vector with one element per line of the description (without the table of decision probabilities).

Examples

des <- design_binary(
  n_t = 12, n_c = 12,
  prior_t = prior_beta(0.5, 0.5), prior_c = prior_beta(0.5, 0.5),
  criterion = criterion_posterior(theta_tv = 0.2, theta_mav = 0.1,
                                  gamma_go = 0.5, gamma_nogo = 0.8)
)
format(qdm_calibrate(des, data.frame(pi_t = 0.4, pi_c = 0.4),
                     data.frame(pi_t = 0.7, pi_c = 0.4),
                     target_go = 0.05, target_nogo = 0.2))
#> [1] "Calibration of the decision thresholds (exact enumeration of the outcomes)"     
#> [2] "  gamma_go   = 0.74: P(Go criterion met | scenario_go) = 0.03368 (target 0.05)" 
#> [3] "  gamma_nogo = 0.39: P(NoGo criterion met | scenario_nogo) = 0.182 (target 0.2)"