Eban numbers: Difference between revisions
Content added Content deleted
Line 128: | Line 128: | ||
=={{header|J}}== |
=={{header|J}}== |
||
Partial solution. As is, the runtime will be unusable for the large range. |
|||
<lang J> |
<lang J> |
||
NB. iseban taken from Julia, excepting I'm not a Julia programmer. |
NB. iseban taken from Julia, excepting I'm not a Julia programmer. |
||
Line 160: | Line 158: | ||
│21│2000 2002 2004 2006 2030 2032 2034 2036 2040 2042 2044 2046 2050 2052 2054 2056 2060 2062 2064 2066 4000│ |
│21│2000 2002 2004 2006 2030 2032 2034 2036 2040 2042 2044 2046 2050 2052 2054 2056 2060 2062 2064 2066 4000│ |
||
└──┴────────────────────────────────────────────────────────────────────────────────────────────────────────┘ |
└──┴────────────────────────────────────────────────────────────────────────────────────────────────────────┘ |
||
(, ([: +/ [: iseban [: >: i.))&> 10000 * 10 ^ i. +:2 |
|||
10000 79 |
|||
100000 399 |
|||
1e6 399 |
|||
1e7 1599 |
|||
</lang> |
</lang> |