aboutsummaryrefslogtreecommitdiff
path: root/challenge-168
diff options
context:
space:
mode:
Diffstat (limited to 'challenge-168')
-rw-r--r--challenge-168/habere-et-dispetire/raku/ch-1.raku11
1 files changed, 11 insertions, 0 deletions
diff --git a/challenge-168/habere-et-dispetire/raku/ch-1.raku b/challenge-168/habere-et-dispetire/raku/ch-1.raku
new file mode 100644
index 0000000000..e2bdcecfaa
--- /dev/null
+++ b/challenge-168/habere-et-dispetire/raku/ch-1.raku
@@ -0,0 +1,11 @@
+#! /usr/bin/env raku
+
+# Perrin Prime
+# https://wikiless.org/wiki/Perrin_number
+# https://oeis.org/A074788
+
+put (3, 0, 2, -> $n3, $n2, $ { $n3 + $n2 } … ∞)
+ .grep(*.is-prime)
+ .unique
+ .head(13)
+ .sort;