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)))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.