aboutsummaryrefslogtreecommitdiff
path: root/tests/testthat
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2020-11-11 10:43:56 +0100
committerJohannes Ranke <jranke@uni-bremen.de>2020-11-11 10:43:56 +0100
commit0cbabc98850e436b1e0703c659cf8a00b52d7503 (patch)
tree9c7b25c2d27affd492a84cbf2f5ce4069a62864a /tests/testthat
parentdf4de0abf471c7013a38b0e6be173a072c4bb74b (diff)
Skip vdiffr tests on travis as they are not robust
As can be seen in the miniscule change seen on R-devel in the reference plot updated with this commit
Diffstat (limited to 'tests/testthat')
-rw-r--r--tests/testthat/FOCUS_2006_D.csf2
-rw-r--r--tests/testthat/test_nafta.R2
-rw-r--r--tests/testthat/test_plot.R1
3 files changed, 4 insertions, 1 deletions
diff --git a/tests/testthat/FOCUS_2006_D.csf b/tests/testthat/FOCUS_2006_D.csf
index a0e63657..7d562426 100644
--- a/tests/testthat/FOCUS_2006_D.csf
+++ b/tests/testthat/FOCUS_2006_D.csf
@@ -5,7 +5,7 @@ Description:
MeasurementUnits: % AR
TimeUnits: days
Comments: Created using mkin::CAKE_export
-Date: 2020-11-08
+Date: 2020-11-11
Optimiser: IRLS
[Data]
diff --git a/tests/testthat/test_nafta.R b/tests/testthat/test_nafta.R
index 62c88983..fcab4ffb 100644
--- a/tests/testthat/test_nafta.R
+++ b/tests/testthat/test_nafta.R
@@ -20,6 +20,7 @@ test_that("Test data from Appendix B are correctly evaluated", {
expect_known_output(print(res), "NAFTA_SOP_Appendix_B.txt")
+ skip_on_travis()
plot_nafta <- function() plot(res)
if(requireNamespace("vdiffr", quietly = TRUE)) {
skip_if(getRversion() < "4.1.0")
@@ -48,6 +49,7 @@ test_that("Test data from Appendix D are correctly evaluated", {
expect_known_output(print(res), "NAFTA_SOP_Appendix_D.txt")
+ skip_on_travis()
plot_nafta <- function() plot(res)
if(requireNamespace("vdiffr", quietly = TRUE)) {
skip_if(getRversion() < "4.1.0")
diff --git a/tests/testthat/test_plot.R b/tests/testthat/test_plot.R
index 40d5928f..587ec02e 100644
--- a/tests/testthat/test_plot.R
+++ b/tests/testthat/test_plot.R
@@ -2,6 +2,7 @@ context("Plotting")
test_that("Plotting mkinfit and mmkin objects is reproducible", {
skip_on_cran()
+ skip_on_travis()
plot_default_FOCUS_C_SFO <- function() plot(fits[["SFO", "FOCUS_C"]])
plot_res_FOCUS_C_SFO <- function() plot(fits[["SFO", "FOCUS_C"]], show_residuals = TRUE)
plot_res_FOCUS_C_SFO_2 <- function() plot_res(fits[["SFO", "FOCUS_C"]])

Contact - Imprint