From 98ccfd78165725d5aa970c325f2707516b7d7295 Mon Sep 17 00:00:00 2001 From: "Zhao, Yujie" Date: Thu, 1 Aug 2024 11:33:52 -0400 Subject: [PATCH] print more digits to the expected object --- tests/testthat/test-unvalidated-sim_gs_n.R | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/tests/testthat/test-unvalidated-sim_gs_n.R b/tests/testthat/test-unvalidated-sim_gs_n.R index 65616541..412b3b57 100644 --- a/tests/testthat/test-unvalidated-sim_gs_n.R +++ b/tests/testthat/test-unvalidated-sim_gs_n.R @@ -255,13 +255,19 @@ test_that("Milestone", { n = rep(400L, 9L), event = c(244, 307, 362, 235, 310, 361, 222, 286, 351), estimate = c( - 0.05708825, 0.05500000, 0.05500000, 0.09823631, 0.09953322, 0.09953322, 0.03140334, 0.04759124, 0.04759124 + 0.0570882489260, 0.0550000000000, 0.0550000000000, + 0.0982363112857, 0.0995332208091, 0.0995332208091, + 0.0314033376240, 0.0475912427493, 0.0475912427493 ), se = c( - 0.05031828, 0.04991868, 0.04991868, 0.05000253, 0.04984352, 0.04984352, 0.05128704, 0.04986524, 0.04986524 + 0.0503182801363, 0.0499186838769, 0.0499186838769, + 0.0500025291675, 0.0498435166464, 0.0498435166464, + 0.0512870375551, 0.0498652399931, 0.0498652399931 ), z = c( - 1.1345429, 1.1017919, 1.1017919, 1.9646268, 1.9969141, 1.9969141, 0.6123055, 0.9543971, 0.9543971 + 1.1345429289596, 1.1017918688652, 1.1017918688652, + 1.9646268483073, 1.9969140924625, 1.9969140924625, + 0.6123055477761, 0.9543971463075, 0.9543971463075 ) ) expect_equal(observed, expected)