From 6526326a4f3460fedf4e43ade6bcb10d26c9fe41 Mon Sep 17 00:00:00 2001 From: habere-et-dispertire Date: Sun, 12 Jun 2022 15:52:16 +0100 Subject: Create ch-1.raku --- challenge-168/habere-et-dispetire/raku/ch-1.raku | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 challenge-168/habere-et-dispetire/raku/ch-1.raku 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; -- cgit