adjacent_nest: Nest a column with adjacent values

In dgrtwo/adventdrob: Personal Package for Advent of Code

Nest a column with adjacent values

Description

Nest a column with adjacent values

Usage

adjacent_nest(x, y = x, diagonal = FALSE)

Arguments

x	A table with columns for row and col
y	A second table with columns row and col. By default, does a self-join
diagonal	Whether diagonal cells are counted as adjacent

Examples

library(purrr)
library(dplyr)
grid11 <- advent_input(11) %>%
  grid_tidy(x)

# One "flash": any cells with a value above 9 cause neighbors to increase
grid11 %>%
  mutate(value = value + 1) %>%
  adjacent_nest(diagonal = TRUE) %>%
  mutate(value = value + map_dbl(adjacent_value, ~ sum(. > 9)))

dgrtwo/adventdrob documentation built on Jan. 3, 2023, 7:27 a.m.