1
0
mirror of https://github.com/msberends/AMR.git synced 2024-12-27 10:06:12 +01:00
AMR/tests/testthat/test-clipboard.R

14 lines
395 B
R

context("clipboard.R")
test_that("clipboard works", {
skip_if_not(clipr::clipr_available())
clipboard_export(antibiotics)
expect_identical(antibiotics,
clipboard_import(date_format = "yyyy-mm-dd"))
clipboard_export(septic_patients[1:100,])
expect_identical(tbl_parse_guess(septic_patients[1:100,]),
clipboard_import(guess_col_types = TRUE))
})