add tests using testthat

2025-12-15 10:30:21 +01:00 · 2018-03-27 17:43:42 +02:00
parent c26839b08e
commit 6f7730dcaa
19 changed files with 231 additions and 17 deletions
--- a/tests/testthat/test-clipboard.R
+++ b/tests/testthat/test-clipboard.R
@@ -0,0 +1,9 @@
+context("clipboard.R")
+
+test_that("clipboard works", {
+  # why is the <<- needed? Won't work without it...
+  t1 <<- AMR::antibiotics
+  clipboard_export(t1, info = FALSE)
+  t2 <- clipboard_import()
+  expect_equal(t1, t2)
+})