Print operating characteristics

Usage

# S3 method for class 'qdm_oc'
print(x, digits = 4L, ...)

Arguments

x: An object of class "qdm_oc".
digits: Number of significant digits for the probabilities.
...: Not used.

Value

x, invisibly.

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)
)
print(qdm_oc(des, data.frame(pi_t = c(0.4, 0.6), pi_c = 0.4)))
#> Operating characteristics (exact enumeration of the outcomes)
#>  pi_t pi_c     Go   NoGo   Gray Miss
#>   0.4  0.4 0.1485 0.4180 0.4335    0
#>   0.6  0.4 0.4891 0.1143 0.3966    0