lower thr

variani · Mar 14, 2019 · eff82da · eff82da
1 parent 70ef926
commit eff82da
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-relfac.R b/tests/testthat/test-relfac.R
@@ -48,7 +48,7 @@ test_that("equivalence on (1|plate) and K", {
 
   m2 <- relmatLmer(diameter ~ (1|id), Penicillin, relmat = list(id = K))
 
-  expect_true(abs(getME(m1, "theta") - getME(m2, "theta")) < 1e-6) 
+  expect_true(abs(getME(m1, "theta") - getME(m2, "theta")) < 1e-4) 
 })
 
 test_that("relfac methods for h2 estimation", {