work on testing

openpharma · Jun 5, 2023 · 9a31f2a · 9a31f2a
1 parent f1f983b
commit 9a31f2a
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/tests/testthat/test-utils_data.R b/tests/testthat/test-utils_data.R
@@ -0,0 +1,5 @@
+test_that("unname_df()", {
+  x <- unname_df(tibble::tibble(x = c(a = 1, b = 2), y = c(c = 3, d = 4)))
+  expect_null(names(x$x))
+  expect_null(names(x$y))
+})