inst/run-day06.R

library(adventofcode21)
x <- readLines("./inst/input06.txt")

p1 <- f06a_step_n_days(x) |> sum()
p2 <- f06a_step_n_days(x, 256) |> sum()

stopifnot(p1 == aoc_solutions$day06a)
stopifnot(p2 == aoc_solutions$day06b)
tjmahr/adventofcode21 documentation built on Jan. 8, 2022, 10:41 a.m.