tests/testthat/test-day20.R

test_that("day 20", {
  x <- example_data_20()
  m <- f20_enhance_n_times(x, 2)
  expect_equal(m, 35)

  m <- f20_enhance_n_times(x, 50)
  expect_equal(m, 3351)
})
tjmahr/adventofcode21 documentation built on Jan. 8, 2022, 10:41 a.m.