OFFSET
1,3
LINKS
Rémy Sigrist, Table of n, a(n) for n = 1..10000
Rémy Sigrist, Scatterplot of the first 100000 terms
EXAMPLE
PROG
(PARI) { print1(0); for (k = 1, 1469, fordiv (k, x, if (Set(digits(x)) == Set(digits(k/x)), print1 (", "x); break))) }
(Python)
from sympy import divisors
from itertools import count
def agen(): # generator of terms
yield 0
for n in count(1):
for x in divisors(n):
if set(str(x)) == set(str(n//x)):
yield x
break
print(list(islice(agen(), 71))) # Michael S. Branicky, Apr 23 2023
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, Apr 23 2023
STATUS
approved