# Define functions --------------------------------------------------------
# Read in data ------------------------------------------------------------
test2 <- here("inst", "2021", "day22-test2.txt")
test_dat2 <- readLines(test2) |> tidy_day22(1000)
# Execute the reboot steps ------------------------------------------------
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.