inst/solution20.R

library(adventofcode2021)
input <- read_pixels(input_file(20))
output2 <- enhance_image(input$image, input$algorithm, n = 2)
sum(output2)
output50 <- enhance_image(input$image, input$algorithm, n = 50)
sum(output50)
Selbosh/adventofcode2021 documentation built on Jan. 1, 2022, 7:20 p.m.