My son came up with a silly language where you add -ie to the end of each word. Like a shirt is a “shirtie” or milk is “milkie”
So I told him about Australia and he absolutely lost it
David Robinson
@drob.bsky.social
6.8K followers 85 following 17 posts
Member of Technical Staff at Anthropic. #rstats fan. Dad x2. He/him
![library(tidyverse)
library(adventdrob)
input <- advent_input(2, 2024)
x <- input$x
is_safe <- function(report) {
d <- diff(report)
return((all(d > 0) || all(d < 0)) && all(between(abs(d), 1, 3)))
}
is_safe_part2 <- function(report) {
return(is_safe(report) ||
any(map_lgl(seq_along(report), \(i) is_safe(report[-i]))))
}
input$x %>%
str_split(" ") %>%
map(as.numeric) %>%
map_lgl(is_safe_part2) %>%
sum()](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:rff3kxjcyd7ubwv6ymktay4h/bafkreig5mlmwy6h6j6aqhxs3hi67ibicktbxzw6xaxbttreuz5xcbgcdiy)
