diff options
Diffstat (limited to 'tests/testthat')
-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") }) |