aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2017-07-22 16:48:11 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2017-07-22 16:56:18 +0200
commit5447af959b2a9b0dc52695bf6a309f346ced085a (patch)
tree5a0239ab72e3703cd939bcbf9b87d18076578c27 /tests
parentec022da4d13bc927108876600107e86797579db5 (diff)
Remove this test as results are platform dependent
On my box and winbuilder it was OK, but the CRAN checks show some different behaviour, so the results seem to be too ill-defined for testing for the type of warning. I had skipped this test earlier as it failed on r-forge.
Diffstat (limited to 'tests')
-rw-r--r--tests/testthat/test_FOMC_ill-defined.R44
1 files changed, 0 insertions, 44 deletions
diff --git a/tests/testthat/test_FOMC_ill-defined.R b/tests/testthat/test_FOMC_ill-defined.R
deleted file mode 100644
index ee3d2b68..00000000
--- a/tests/testthat/test_FOMC_ill-defined.R
+++ /dev/null
@@ -1,44 +0,0 @@
-# Copyright (C) 2016 Johannes Ranke
-# Contact: jranke@uni-bremen.de
-
-# This file is part of the R package mkin
-
-# mkin is free software: you can redistribute it and/or modify it under the
-# terms of the GNU General Public License as published by the Free Software
-# Foundation, either version 3 of the License, or (at your option) any later
-# version.
-
-# This program is distributed in the hope that it will be useful, but WITHOUT
-# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-# FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
-# details.
-
-# You should have received a copy of the GNU General Public License along with
-# this program. If not, see <http://www.gnu.org/licenses/>
-
-context("Fitting the FOMC model with large parameter correlation")
-
-# Dataset that I ran across during my work and for which the calculation of the
-# Jacobian failed. Data were slightly fuzzed.
-FOMC_test <- data.frame(
- name = "test_compound",
- time = c(0, 14, 31, 59, 91),
- value = c(45.8, 28.0, 28.5, 35.1, 35.6))
-
-test_that("Fitting with large parameter correlation gives warnings", {
-
- #skip("Skip test for warnings triggered by large parameter correlation as it failed on r-forge")
-
- # When fitting from the maximum, the Port algorithm does not converge (with
- # default settings)
- expect_warning(
- fit.FOMC.Port <- mkinfit("FOMC", FOMC_test, method.modFit = "Port"),
- "Optimisation by method Port did not converge")
-
- # When we use Levenberg-Marquardt, we get a problem estimating the Jacobian
- # for the untransformed model
- expect_warning(
- fit.FOMC.Marq <- mkinfit("FOMC", FOMC_test, method.modFit = "Marq"),
- "Calculation of the Jacobian failed for the cost function of the untransformed model")
-
-})

Contact - Imprint