added sample test for PCC.conflicts

Jean-Baptiste-Camps · Oct 25, 2017 · a29a3e0 · a29a3e0
1 parent 014247f
commit a29a3e0
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 0 deletions.
diff --git a/tests/testthat/myConflicts.rds b/tests/testthat/myConflicts.rds
diff --git a/tests/testthat/test-PCC.conflicts.R b/tests/testthat/test-PCC.conflicts.R
@@ -0,0 +1,7 @@
+context("PCC.conflicts")
+#TODO: check fournival output
+test_that("PCC.conflicts correct output on Fournival", {
+  data("fournival")
+  myConflicts = PCC.conflicts(fournival)
+  expect_equal_to_reference(myConflicts, file="myConflicts.rds")
+})