Anonymous user
Eban numbers: Difference between revisions
→{{header|J}}
Line 128:
=={{header|J}}==
<lang J>
NB. iseban taken from Julia, excepting I'm not a Julia programmer.
Line 160 ⟶ 158:
│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>
| |||