Skip to main content

Quick actions

cmd+k|ctrl+k

Search actions and languages

Navigation

Languages

serial-programming.p6

Snippet info

Language

Raku

Visibility

public

Author

zostay

Created

2016-08-29T16:31:43Z

Updated

2016-08-29T16:31:43Z

123456

my @nths = 4000 + (1 .. 4);

my @primes = gather for @nths -> $n {

take (1 .. *).grep(*.is-prime)[$n];

}

.say for @primes;

my @nths = 4000 + (1 .. 4);
my @primes = gather for @nths -> $n {
    take (1 .. *).grep(*.is-prime)[$n];
}
.say for @primes;

Raku

INFO

Home Public snippets Account Contact Privacy