Frobenius numbers: Difference between revisions

Content added Content deleted
(→‎{{header|jq}}: simplify)
Line 777: Line 777:
. as $limit
. as $limit
| label $out
| label $out
| foreach (range(3;infinite;2) | select(is_prime)) as $p ({p: null, prev: 2};
| foreach (range(3;infinite;2) | select(is_prime)) as $p ({prev: 2};
.p = $p
(.prev * $p - .prev - $p) as $frob
| (.prev * $p - .prev - $p) as $frob
| if $limit == null or $frob > $limit then break $out
| if $limit == null or $frob > $limit then break $out
else .frob = $frob
else .frob = $frob
end
end
| .prev = $p;
| .prev = $p;
.frob);
.frob);