inst/run-day02.R

library(adventofcode21)
x <- read.table("./inst/input02.txt", sep = " ")
names(x) <- c("direction", "distance")

p1 <- f02a(x)
p2 <- f02b(x)

stopifnot(p1 == aoc_solutions$day02a)
stopifnot(p2 == aoc_solutions$day02b)
Bisaloo/adventofcode21 documentation built on Dec. 17, 2021, 11:48 a.m.