tests/testthat/test-expand_grid.R

context("expand_grid")

test_that("simple case", {

  expect_equivalent(
    expand_grid(year = c(1990:1991), cat_id = c(77, 88)),
    tibble(year = as.integer(c(1990, 1990, 1991, 1991)), cat_id = c(77, 88, 77, 88)))

})
BAAQMD/tbltools documentation built on Feb. 29, 2024, 5:45 a.m.