From 885ea2cd3392e57efff72e5094643917d6ba2be8 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Mon, 25 Feb 2019 21:18:11 +0100 Subject: Fixes for last commit --- tests/testthat/test_FOCUS_D_UBA_expertise.R | 2 ++ 1 file changed, 2 insertions(+) (limited to 'tests/testthat/test_FOCUS_D_UBA_expertise.R') diff --git a/tests/testthat/test_FOCUS_D_UBA_expertise.R b/tests/testthat/test_FOCUS_D_UBA_expertise.R index be6a8c9f..ff2c6f5f 100644 --- a/tests/testthat/test_FOCUS_D_UBA_expertise.R +++ b/tests/testthat/test_FOCUS_D_UBA_expertise.R @@ -51,6 +51,8 @@ test_that("Fits with formation fractions are correct for FOCUS D", { c(7.02, 23.33)) expect_equal(round(as.numeric(endpoints(fit.ff)$distimes["m1", ]), 1), c(131.8, 437.7)) + # The following value is not from the UBA expertise, only used here + # to check stability of the AIC calculation expect_equivalent(AIC(fit.ff), 212.6, scale = 1, tolerance = 0.1) }) -- cgit v1.2.1