Factorial primes: Difference between revisions
Content added Content deleted
m (→{{header|ALGOL 68}}: Tweak) |
(J draft) |
||
| Line 78: | Line 78: | ||
10: 14! - 1 = 87178291199 |
10: 14! - 1 = 87178291199 |
||
</pre> |
</pre> |
||
=={{header|J}}== |
|||
<lang J> (,. (-!)/"1)1>.(,. >.@(!inv)@<:) (#~ 1 p: ]) ~.,(!i.27x)+/1 _1 |
|||
2 1 1 |
|||
3 2 1 |
|||
7 3 1 |
|||
5 3 _1 |
|||
23 4 _1 |
|||
719 6 _1 |
|||
5039 7 _1 |
|||
39916801 11 1 |
|||
479001599 12 _1 |
|||
87178291199 14 _1</lang> |
|||
=={{header|Raku}}== |
=={{header|Raku}}== |
||