Primes whose sum of digits is 25: Difference between revisions

Content added Content deleted
(→‎J: add)
m (→‎J: simplify)
Line 1,109: Line 1,109:


=={{header|J}}==
=={{header|J}}==
<syntaxhighlight lang="j"> (#~ (25 = [: +/ "."0@":)"0) p: i. _1 p: 5000
<syntaxhighlight lang="j"> (#~ 25 = +/@("."0@":)"0) p: i. _1 p: 5000
997 1699 1789 1879 1987 2689 2797 2887 3499 3697 3769 3877 3967 4597 4759 4957 4993</syntaxhighlight>
997 1699 1789 1879 1987 2689 2797 2887 3499 3697 3769 3877 3967 4597 4759 4957 4993</syntaxhighlight>