aboutsummaryrefslogtreecommitdiff
path: root/challenge-169
diff options
context:
space:
mode:
authorhabere-et-dispertire <github.eggs@neverbox.com>2022-06-19 22:16:40 +0100
committerGitHub <noreply@github.com>2022-06-19 22:16:40 +0100
commitf6a6c85e3f6ebff613186cf8b7cdf7e915725ceb (patch)
treeb130052087c59d40263700afa503e2af7a09b482 /challenge-169
parent15903ca51f442e77b9b2a7a6c83d87756b46d5b3 (diff)
downloadperlweeklychallenge-club-f6a6c85e3f6ebff613186cf8b7cdf7e915725ceb.tar.gz
perlweeklychallenge-club-f6a6c85e3f6ebff613186cf8b7cdf7e915725ceb.tar.bz2
perlweeklychallenge-club-f6a6c85e3f6ebff613186cf8b7cdf7e915725ceb.zip
Update ch-1.raku
Diffstat (limited to 'challenge-169')
-rw-r--r--challenge-169/habere-et-dispetire/raku/ch-1.raku9
1 files changed, 5 insertions, 4 deletions
diff --git a/challenge-169/habere-et-dispetire/raku/ch-1.raku b/challenge-169/habere-et-dispetire/raku/ch-1.raku
index 67400cc525..0bbc64666c 100644
--- a/challenge-169/habere-et-dispetire/raku/ch-1.raku
+++ b/challenge-169/habere-et-dispetire/raku/ch-1.raku
@@ -1,6 +1,7 @@
#! /usr/bin/env raku
# Brilliant numbers
+# https://oeis.org/A078972
use Prime::Factor;
@@ -12,7 +13,7 @@ sub is-brilliant ($n) {
}
-say (1 .. ∞)
- # https://oeis.org/A078972
- .grep(&is-brilliant)
- .head(20)
+(1 .. ∞)
+ .grep( &is-brilliant )
+ .head( 20 )
+ .put