inst/run-day01.R

library(adventofcode20)
x <- readLines("./inst/input01.txt")
x <- as.numeric(x)

p1 <- prod(find_2020_pair(x))
p2 <- prod(find_2020_trio(x))

stopifnot(p1 == aoc20_solutions$day01a)
stopifnot(p2 == aoc20_solutions$day01b)
tjmahr/adventofcode20 documentation built on Dec. 31, 2020, 8:39 a.m.