aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2019-02-25 21:15:51 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2019-02-25 21:15:51 +0100
commita9285f356f92e45dfec43ab6ad06d65b1ffe08d1 (patch)
tree64e48b1ee393cf54cee093798c3a695516897106
parentdd4e62ad803b74667378808aa0249cab6326d05c (diff)
Test AIC calculation
-rw-r--r--tests/testthat/test_FOCUS_D_UBA_expertise.R1
-rw-r--r--tests/testthat/test_parent_only.R2
2 files changed, 2 insertions, 1 deletions
diff --git a/tests/testthat/test_FOCUS_D_UBA_expertise.R b/tests/testthat/test_FOCUS_D_UBA_expertise.R
index 42c4fcfb..be6a8c9f 100644
--- a/tests/testthat/test_FOCUS_D_UBA_expertise.R
+++ b/tests/testthat/test_FOCUS_D_UBA_expertise.R
@@ -51,6 +51,7 @@ 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))
+ expect_equivalent(AIC(fit.ff), 212.6, scale = 1, tolerance = 0.1)
})
test_that("Fits without internal transformations are correct for FOCUS D", {
diff --git a/tests/testthat/test_parent_only.R b/tests/testthat/test_parent_only.R
index 7521e145..572047b7 100644
--- a/tests/testthat/test_parent_only.R
+++ b/tests/testthat/test_parent_only.R
@@ -1,4 +1,4 @@
-# Copyright (C) 2015,2018 Johannes Ranke
+# Copyright (C) 2015,2018,2019 Johannes Ranke
# Contact: jranke@uni-bremen.de
# This file is part of the R package mkin

Contact - Imprint