Ormiston triples: Difference between revisions

Content added Content deleted
m (→‎{{header|Raku}}: Add a Raku example (sigh))
(J)
Line 194: Line 194:
4,925 Ormiston triples before 10,000,000,000
4,925 Ormiston triples before 10,000,000,000
</pre>
</pre>

=={{header|J}}==
Taking the laziest approach here, we'll use the definition of [[Ormiston_pairs#J|<code>isorm</code>]] from the Ormison pairs task:
<syntaxhighlight lang=J> omt=: (#~ isorm) _4 p: (#~ isorm) i.&.(p:inv) 1e9
#omt NB. number of ormiston triples less than a billion
368
5 5$omt NB. first prime of the first 25 triples.
11117123 12980783 14964017 32638213 32964341
33539783 35868013 44058013 46103237 48015013
50324237 52402783 58005239 60601237 61395239
74699789 76012879 78163123 80905879 81966341
82324237 82523017 83279783 86050781 92514341
</syntaxhighlight>


=={{header|Phix}}==
=={{header|Phix}}==