From af2b10aa771160e6677250aec3205f7f1bb3fade Mon Sep 17 00:00:00 2001 From: Kassel Hingee Date: Wed, 22 May 2024 17:36:24 +1000 Subject: [PATCH] one test error on M1mac according to CRAN - due to floating point differences it seems. But difficult check good threshold as M1Mac not available for me to test on --- tests/testthat/test-Bingham.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/testthat/test-Bingham.R b/tests/testthat/test-Bingham.R index 229c9338..1862b870 100644 --- a/tests/testthat/test-Bingham.R +++ b/tests/testthat/test-Bingham.R @@ -141,9 +141,9 @@ test_that("Bingham methods match for simulated weights, ignoring SE, which shoul sim1 <- Bingham(vw$newY, method = "Mardia") dir1 <- Bingham(Y, method = "Mardia", w = vw$w) - expect_equal(sim1$est, dir1$est) + expect_equal(sim1$est, dir1$est, tolerance = 10 * sqrt(.Machine$double.eps)) sim2 <- Bingham(vw$newY, method = "smfull") dir2 <- Bingham(Y, method = "smfull", w = vw$w) - expect_equal(sim2$est, dir2$est) + expect_equal(sim2$est, dir2$est, tolerance = 10 * sqrt(.Machine$double.eps)) })