This repo contains solutions to the Arithmetic Progression problem. It was coverd in this YouTube video (coming). It can be found:
- LeetCode: Problem 1502
- Perl Weekly Challenge: Week 351, Problem 2
It can be solved trivially if you have three algorithms:
- sort
- deltas or map_adjacent
- all_equal
| Language | Solution |
|---|---|
| Jelly | ṢIE |
| Uiua | /↧⧈=⧈-⍆ |
| Uiua | =1⧻◴⧈-⍆ |
| Kap | 1=≢∪2-/∧ |
| Kap | ∧/2=/2-/∧ |
| Dyalog APL | ∧/2=/2-/⊂⍤⍋⍛⌷ |
| BQN | 1=·≠∘⍷·-´˘2↕∧ |
| Dyalog APL | 1=(≢∘∪2-/⊂⍤⍋⍛⌷) |
| BQN | ∧´·=´˘2↕·-´˘2↕∧ |
| J | 1=[:#[:~.2-/\/:~ |
| Jello | sort deltas all_eq |