Revision as of 21:42, 11 October 2023 (view source) Querfeld (talk \| contribs) (→‎J: only a few seconds faster) ← Older edit		Revision as of 07:54, 19 October 2023 (view source) Querfeld (talk \| contribs) m (→‎J: minor optimization) Newer edit →
Line 307: =={{header\|J}}== Slow (runs ~~for~~a ~~several~~few minutes): <syntaxhighlight lang="j">repunitp=. 1 p: ^&x: %&<: [ (2x2 + i. 15) (~~;/@~~[ ,.;"0 repunitp"0/ <@# ]) i.&.(p:inv) 1000</syntaxhighlight> {{out}} <pre>

Repunit primes (view source)