add test for checking no data.tables

randrescastaneda · Apr 29, 2021 · 4bc8f2e · 4bc8f2e
1 parent 15bddf9
commit 4bc8f2e
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/tests/testthat/test-merge.R b/tests/testthat/test-merge.R
@@ -514,4 +514,9 @@ test_that("no matching obs", {
 
 })
 
+test_that("convert to data.table", {
+  xx1 <- as.data.frame(x1)
+  expect_equal(merge(xx1, y1), merge(x1, y1))
+})
+