diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2019-02-27 13:40:05 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2019-02-27 13:40:05 +0100 |
commit | 3faf5bc087a4569e5b40f60b9349ad264654040b (patch) | |
tree | 59fd9288fb0da13ba988f75cb9616846cb3d4b4b /tests | |
parent | 06327bc9d4269e2c8652c9af8cb038fe097729f3 (diff) |
Fix test for mkinds printing
Diffstat (limited to 'tests')
-rw-r--r-- | tests/testthat/FOCUS_2006_C_mkinds.txt | 6 | ||||
-rw-r--r-- | tests/testthat/test_mkinds.R | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/tests/testthat/FOCUS_2006_C_mkinds.txt b/tests/testthat/FOCUS_2006_C_mkinds.txt index e69de29b..582ffd3c 100644 --- a/tests/testthat/FOCUS_2006_C_mkinds.txt +++ b/tests/testthat/FOCUS_2006_C_mkinds.txt @@ -0,0 +1,6 @@ +<mkinds> with $title: FOCUS C +Observed compounds $observed: parent +Sampling times $sampling_times: 0, 1, 3, 7, 14, 28, 63, 91, 119 +With a maximum of 1 replicates +Time unit: days +Observation unit: %AR diff --git a/tests/testthat/test_mkinds.R b/tests/testthat/test_mkinds.R index 1046449b..6e932ee8 100644 --- a/tests/testthat/test_mkinds.R +++ b/tests/testthat/test_mkinds.R @@ -20,5 +20,5 @@ context("Test dataset class mkinds used in gmkin") test_that("An mkinds object can be created and printed", { testdata <- mkinds$new("FOCUS C", data = FOCUS_2006_C, time_unit = "days", unit = "%AR") - expect_known_output(testdata, "FOCUS_2006_C_mkinds.txt") + expect_known_output(print(testdata), "FOCUS_2006_C_mkinds.txt") }) |