1
0
Fork 0
advent-of-code-2024/21/main.rb

174 lines
3.8 KiB
Ruby
Executable file

#!/usr/bin/env ruby
require "debug"
input = (ARGV.first.nil? ? DATA : ARGF)
.readlines(chomp: true)
.map(&:chars)
@arrow_dirs = {
"<" => [0, -1],
"^" => [-1, 0],
">" => [0, 1],
"v" => [1, 0],
}
@dir_arrows = @arrow_dirs.invert
numeric_movements = {
"0" => ["^", ">"],
"A" => ["<", "^"],
"1" => ["^", ">"],
"2" => ["<", "^", ">", "v"],
"3" => ["<", "^", "v"],
"4" => ["^", ">", "v"],
"5" => ["<", "^", ">", "v"],
"6" => ["<", "^", "v"],
"7" => [">", "v"],
"8" => ["<", ">", "v"],
"9" => ["<", "v"],
}
directional_movements = {
"^" => [">", "v"],
"A" => ["v", "<"],
"<" => [">"],
"v" => ["^", ">", "<"],
">" => ["^", "<"],
}
numeric_keypad = [
["7", "8", "9"],
["4", "5", "6"],
["1", "2", "3"],
[nil, "0", "A"],
]
directional_keypad = [
[nil, "^", "A"],
["<", "v", ">"],
]
class PriorityQueue < Array
alias_method :extract_min, :shift
def <<(v)
super
sort_by!(&:last)
end
end
def discover(char, graph)
(0...graph.size).each do |x|
(0...graph.first.size).each do |y|
return [x, y] if char == graph.dig(x, y)
end
end
end
def dijkstra_paths(prev, target, current_path = [])
return [current_path.reverse] if prev[target].nil?
prev[target].flat_map do |parent|
dijkstra_paths(prev, parent, current_path + [target])
end
end
def dijkstra_with_lookup(graph, movements, start_char, target_char)
start = discover(start_char, graph)
target = discover(target_char, graph)
dijkstra(graph, movements, start, target)
end
def dijkstra(graph, movements, start, target)
queue = PriorityQueue.new
dest = Hash.new
prev = Hash.new
queue << [start, 0]
dest[start] = 0
prev[start] = nil
until queue.empty?
node, moves = queue.extract_min
movements[graph.dig(*node)]
.map { @arrow_dirs[_1] }
.map { |dx, dy| [node.first + dx, node.last + dy] }
.each do |neighbor|
new_moves = moves + 1
if dest[neighbor].nil? || new_moves < dest[neighbor]
dest[neighbor] = new_moves
prev[neighbor] = [node]
queue << [neighbor, new_moves]
elsif new_moves == dest[neighbor]
prev[neighbor] << node
end
end
end
paths = dijkstra_paths(prev, target)
return dest, paths
end
@numeric_map = numeric_keypad
.flatten.reject(&:nil?)
.permutation(2).to_a
.map { [[_1, _2], dijkstra_with_lookup(numeric_keypad, numeric_movements, _1, _2)] }
.map do |(start, target), (dest, paths)|
presses = paths.map do |path|
([discover(start, numeric_keypad)] + path)
.each_cons(2).to_a
.map { @dir_arrows[[_2.first - _1.first, _2.last - _1.last]] }
end
[[start, target], presses]
end
.to_h
@directional_map = directional_keypad
.flatten.reject(&:nil?)
.permutation(2).to_a
.map { [[_1, _2], dijkstra_with_lookup(directional_keypad, directional_movements, _1, _2)] }
.map do |(start, target), (dest, paths)|
presses = paths.map do |path|
([discover(start, directional_keypad)] + path)
.each_cons(2).to_a
.map { @dir_arrows[[_2.first - _1.first, _2.last - _1.last]] }
end
[[start, target], presses]
end
.to_h
def minimum(chars, robots = 2, depth = 0, cache = {})
return cache[[chars, depth]] if cache.key?([chars, depth])
current, length, chars = "A", 0, Array(chars)
return cache[[chars, depth]] = chars.map do |char|
moves = (depth == 0 ? @numeric_map : @directional_map)
.fetch([current, char], [[]])
.map { _1 + ["A"] }
current = char
if depth == robots
moves.map(&:size).min
else
moves.map { minimum(_1, robots, depth + 1, cache) }.min
end
end.sum
end
@numeric_map = @numeric_map
@directional_map = @directional_map
p input.map { minimum(_1) * _1.join.to_i }.sum
p input.map { minimum(_1, 25) * _1.join.to_i }.sum
__END__
029A
980A
179A
456A
379A