Penta-power prime seeds: Difference between revisions
Content added Content deleted
m (→{{header|RPL}}: added execution time) |
(→J: simplify, speedup 2.6 times) |
||
Line 498: | Line 498: | ||
=={{header|J}}== |
=={{header|J}}== |
||
<syntaxhighlight lang=j> |
<syntaxhighlight lang=j> ps=. ] #~ 1 p: 1 + ^~ + ] |
||
_10 ]\ |
_10 ]\ 4x ps 3x ps 2 ps 1 ps 0 ps i. 1520000 |
||
1 5 69 1665 2129 25739 29631 62321 77685 80535 |
1 5 69 1665 2129 25739 29631 62321 77685 80535 |
||
82655 126489 207285 211091 234359 256719 366675 407945 414099 628859 |
82655 126489 207285 211091 234359 256719 366675 407945 414099 628859 |