From c661bdfdaf24bf240707712b06bca1b7e212ac95 Mon Sep 17 00:00:00 2001 From: Audrey Yeo Date: Tue, 31 Dec 2024 20:20:08 +0100 Subject: [PATCH] clean --- tests/testthat/test-boundsPredprob.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/testthat/test-boundsPredprob.R b/tests/testthat/test-boundsPredprob.R index 8de932ad..5d02f362 100644 --- a/tests/testthat/test-boundsPredprob.R +++ b/tests/testthat/test-boundsPredprob.R @@ -92,11 +92,11 @@ test_that("boundsPredprob with Beta Mixture Priors give correct results", { expect_equal(result$xL, c(2, 6)) expect_equal(result$pL, c(0.2, 0.3)) expect_equal(result$predL, c(0.0409, 0)) - expect_equal(result$postL, c(0.367, 0.7734)) + expect_equal(result$postL, c(0.27410, 0.69650)) expect_equal(result$UciL, c(0.5069, 0.5078)) expect_equal(result$xU, c(6, 7)) expect_equal(result$pU, c(0.6, 0.35)) expect_equal(result$predU, c(0.9859, 1)) - expect_equal(result$postU, c(0.9875, 0.8919)) + expect_equal(result$postU, c(0.97480, 0.840)) expect_equal(result$LciU, c(0.3035, 0.1773)) })