From 6b4ab746e5474dfeda9237f01bc2dd01f1bb62ee Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Wed, 27 Feb 2019 12:04:52 +0100
Subject: Increase test coverage

---
 tests/testthat/test_mkinds.R | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100644 tests/testthat/test_mkinds.R

(limited to 'tests/testthat/test_mkinds.R')

diff --git a/tests/testthat/test_mkinds.R b/tests/testthat/test_mkinds.R
new file mode 100644
index 00000000..e017301c
--- /dev/null
+++ b/tests/testthat/test_mkinds.R
@@ -0,0 +1,6 @@
+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")
+})
-- 
cgit v1.2.3