Erdős-primes: Difference between revisions
Content added Content deleted
m (→{{header|J}}) |
m (→{{header|J}}) |
||
| Line 594: | Line 594: | ||
Implementation: |
Implementation: |
||
<lang J>NB. erdos primes greater than !k and less than or equal to !k+1 |
<lang J>NB. erdos primes greater than !k and less than or equal to !k+1 (where !k is the factorial of k) |
||
erdospr=: {{ k=. y |
erdospr=: {{ k=. y |
||
f=. !k+0 1 |
f=. !k+0 1 |
||