tests/testthat/test-vctrs-tidytable.R

test_that("vec_cbind returns a tidytable", {
  new_df <- vec_cbind(data.frame(x = 1:3), tidytable(y = "foo"))

  expect_true(is_tidytable(new_df))
})

Try the tidytable package in your browser

Any scripts or data that you put into this service are public.

tidytable documentation built on Oct. 5, 2023, 5:07 p.m.