diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2015-05-15 13:04:36 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2015-05-15 13:04:36 +0200 |
| commit | 9a5d2378845e584a2a2c6c09f7ef99a82d09273b (patch) | |
| tree | 34f7716ee4f4060ac371cbeea4466fb9b540ebf3 /tests/testthat/test_FOCUS_D_UBA_expertise.R | |
| parent | c4960b6d8f0fe84e9a05966d4208a89d780a887c (diff) | |
Add synthetic data generated for UBA expertise, tests
The new tests are based on the results documented in the expertise
I wrote for the UBA (currently unpublished).
Diffstat (limited to 'tests/testthat/test_FOCUS_D_UBA_expertise.R')
| -rw-r--r-- | tests/testthat/test_FOCUS_D_UBA_expertise.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/testthat/test_FOCUS_D_UBA_expertise.R b/tests/testthat/test_FOCUS_D_UBA_expertise.R index f9322714..ce1e0a5a 100644 --- a/tests/testthat/test_FOCUS_D_UBA_expertise.R +++ b/tests/testthat/test_FOCUS_D_UBA_expertise.R @@ -34,7 +34,7 @@ test_that("Fitted parameters are correct for FOCUS D", { c(99.60, 0.0987, 0.0053, 0.5145)) }) -test_that("Fitted parameters are correct for FOCUS D", { +test_that("FOCUS chi2 error levels are correct for FOCUS D", { expect_equivalent(round(100 * mkinerrmin(fit.ff)$err.min, 2), c(6.40, 6.46, 4.69)) }) |