tests/testthat/test-goose_race.R

test_that("cross_df works as expects", {
  gr <- goose_race(x = 5, y = 5)
  expect_equal(nrow(gr$locations), 25)
})
mtnman38/lab documentation built on March 23, 2020, 5:27 a.m.