✔ | F W S OK | Context
⠏ | 0 | task-1-subtask-1-tests
⠏ | 0 | beta_point_est()
⠼ | 3 2 | beta_point_est()
✖ | 3 2 | beta_point_est() [0.1s]
────────────────────────────────────────────────────────────────────────────────
Failure ('test-task-1-subtask-1-tests.R:16:3'): beta_point_est()
beta_point_est(prior_alpha = alpha, prior_beta = beta, data = test) not equivalent to c(0.5).
1/1 mismatches
[1] 0.222 - 0.5 == -0.278
Error: Incorrect result for prior_alpha = 2, prior_beta = 4 and data = c(0, 1, 1, 0, 1, 1)
Failure ('test-task-1-subtask-1-tests.R:23:3'): beta_point_est()
beta_point_est(prior_alpha = alpha, prior_beta = beta, data = test) not equivalent to c(0.5).
1/1 mismatches
[1] 0.222 - 0.5 == -0.278
Error: Incorrect result for prior_alpha = 3, prior_beta = 5 and data = c(0, 1, 1, 0, 1, 1, 0, 1)
Failure ('test-task-1-subtask-1-tests.R:30:3'): beta_point_est()
beta_point_est(prior_alpha = alpha, prior_beta = beta, data = test) not equivalent to c(0.5555556).
1/1 mismatches
[1] 0.222 - 0.556 == -0.333
Error: Incorrect result for prior_alpha = 3, prior_beta = 5 and data = c(0, 1, 1, 0, 1, 1, 0, 1, 1, 1)
────────────────────────────────────────────────────────────────────────────────
⠏ | 0 | task-2-subtask-1-tests
⠏ | 0 | beta_interval()
✖ | 3 2 | beta_interval()
────────────────────────────────────────────────────────────────────────────────
Failure ('test-task-2-subtask-1-tests.R:16:3'): beta_interval()
beta_interval(...) not equivalent to c(0.2712499, 0.7287501).
2/2 mismatches (average diff: 0.26)
[1] 0.0846 - 0.271 == -0.187
[2] 0.3956 - 0.729 == -0.333
Error: Incorrect result for prior_alpha = 2, prior_beta = 4 and data = c(0, 1, 1, 0, 1, 1) and 90% interval.
Failure ('test-task-2-subtask-1-tests.R:23:3'): beta_interval()
beta_interval(...) not equivalent to c(0.2999865, 0.7000135).
2/2 mismatches (average diff: 0.26)
[1] 0.0846 - 0.3 == -0.215
[2] 0.3956 - 0.7 == -0.304
Error: Incorrect result for prior_alpha = 3, prior_beta = 5 and data = c(0, 1, 1, 0, 1, 1, 0, 1) and 90% interval.
Failure ('test-task-2-subtask-1-tests.R:30:3'): beta_interval()
beta_interval(...) not equivalent to c(0.3640088, 0.7398856).
2/2 mismatches (average diff: 0.312)
[1] 0.0846 - 0.364 == -0.279
[2] 0.3956 - 0.740 == -0.344
Error: Incorrect result for prior_alpha = 3, prior_beta = 5 and data = c(0, 1, 1, 0, 1, 1, 0, 1, 1, 1) and 90% interval.
────────────────────────────────────────────────────────────────────────────────
⠏ | 0 | task-3-subtask-1-tests
⠏ | 0 | beta_low()
✖ | 3 2 | beta_low()
────────────────────────────────────────────────────────────────────────────────
Failure ('test-task-3-subtask-1-tests.R:16:3'): beta_low()
beta_low(...) not equivalent to c(0.5).
1/1 mismatches
[1] 0.451 - 0.5 == -0.0489
Error: Incorrect result for prior_alpha = 2, prior_beta = 4 and data = c(0, 1, 1, 0, 1, 1)
Failure ('test-task-3-subtask-1-tests.R:23:3'): beta_low()
beta_low(...) not equivalent to c(0.5).
1/1 mismatches
[1] 0.451 - 0.5 == -0.0489
Error: Incorrect result for prior_alpha = 3, prior_beta = 5 and data = c(0, 1, 1, 0, 1, 1, 0, 1)
Failure ('test-task-3-subtask-1-tests.R:30:3'): beta_low()
beta_low(...) not equivalent to 0.0004932497.
1/1 mismatches
[1] 0.451 - 0.000493 == 0.451
Error: Incorrect result for prior_alpha = 3, prior_beta = 5 and data = c(0, 1, 1, 0, 1, 1, 0, 1, 1, 1)
────────────────────────────────────────────────────────────────────────────────
══ Results ═════════════════════════════════════════════════════════════════════
Duration: 0.3 s
[ FAIL 9 | WARN 0 | SKIP 0 | PASS 6 ]