library(adventofcode17)
bits <- generate_grid_hashes("ljoxqyyw")
p1 <- str_sum_ones(bits)
p2 <- count_grid_regions(bits)
stopifnot(p1 == aoc17_solutions$day14a)
stopifnot(p2 == aoc17_solutions$day14b)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.