RosettaCodeData/Task/Summarize-primes/Sidef/summarize-primes.sidef

8 lines
200 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
1000.primes.map_reduce {|a,b| a + b }.map_kv {|k,v|
[k+1, prime(k+1), v]
}.grep { .tail.is_prime }.prepend(
['count', 'prime', 'sum']
).each_2d {|n,p,s|
printf("%5s %6s %8s\n", n, p, s)
}