Largest difference between adjacent primes: Difference between revisions

(added AWK)
Line 268:
290 R = P2 - P
300 RETURN</lang>
 
=={{header|jq}}==
{{works with|jq}}
'''Works with gojq, the Go implementation of jq'''
 
See [[Erdős-primes#jq]] for a suitable definition of `is_prime` as used here.
 
<lang jq># Primes less than . // infinite
def primes:
(. // infinite) as $n
| if $n < 3 then empty
else 2, (range(3; $n) | select(is_prime))
end;
 
def largest_difference_between_adjacent_primes:
reduce primes as $p ( null; # [prev, diff]
if . == null then [$p, 0]
else ($p - .[0]) as $diff
| if $diff > .[1] then [$p, $diff]
else .[0] = $p
end
end)
| .[1];
 
pow(10; 1, 2, 6) | largest_difference_between_adjacent_primes
</lang>
{{out}}
<pre>
2
8
14
</pre>
 
=={{header|Julia}}==
Line 293 ⟶ 325:
The maximum prime interval in primes up to 10000000000 is 354: for example at [4302407359, 4302407713].
</pre>
 
=={{header|Pascal}}==
==={{header|Free Pascal}}===
2,482

edits