aboutsummaryrefslogtreecommitdiff
path: root/tests/testthat
diff options
context:
space:
mode:
Diffstat (limited to 'tests/testthat')
-rw-r--r--tests/testthat/FOCUS_2006_C_mkinds.txt6
-rw-r--r--tests/testthat/test_mkinds.R2
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")
})

Contact - Imprint