Summarize primes: Difference between revisions

Content added Content deleted

Inline

@@ Line 734: / Line 734: @@
 "Prime sums of primes less than 1000",
 (primes(1000)
- | . as $p1000
+ | range(1; length) as $n
+ | (.[: $n] | add) as $sum
- | range(1; length)
- | ($p1000[: .] | add) as $sum
  | select($sum | is_prime)
- | "The sum of the \(.) primes from 2 to \($p1000[.-1]) is \($sum)." )
+ | "The sum of the \($n) primes from 2 to \(.[$n-1]) is \($sum)." )</lang>
-</lang>
 {{out}}
 <pre>