Determine rejection times for an e-process output
Value
Named list with elements:
threshold— rejection threshold (2 / alpha).tau_pq— firsttwheree_pq >= threshold(NAif never crossed).tau_qp— firsttwheree_qp >= threshold(NAif never crossed).reject_pq— logical: was \(H_0^w(p,q)\) ever rejected?reject_qp— logical: was \(H_0^w(q,p)\) ever rejected?
Examples
scores1 <- c(-0.04, -0.09, -0.01, -0.16)
scores2 <- c(-0.09, -0.16, -0.04, -0.25)
ep <- eprocess(scores1, scores2, alpha = 0.05)
eprocess_rejections(ep, alpha = 0.05)
#> $threshold
#> [1] 40
#>
#> $tau_pq
#> [1] NA
#>
#> $tau_qp
#> [1] NA
#>
#> $reject_pq
#> [1] FALSE
#>
#> $reject_qp
#> [1] FALSE
#>