P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 20:41:58 +02:00
Code Releases Activity

fix tests

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2018-03-27 17:58:46 +02:00
parent 6f7730dcaa
commit 1b3cc41c08
3 changed files with 8 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
tests/testthat/Rplots.pdf
View File

Binary file not shown.

12
tests/testthat/test-clipboard.R
View File

@ -1,9 +1,11 @@
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)
if (Sys.info()['sysname'] == "Windows") {
# why is the <<- needed? Won't work without it...
t1 <<- AMR::antibiotics
clipboard_export(t1, info = FALSE)
t2 <- clipboard_import()
expect_equal(t1, t2)
}
})