OFFSET
1,3
COMMENTS
Inspired by A328095.
Contains all numbers whose digit sum is a power of 10.
Contains all numbers of the form 5*10^k and 6*10^k. Terms which are not in the sets above are: 0, 6667, 58824, 8823529412, ... - Chai Wah Wu, Oct 19 2019
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..10000
MAPLE
a:= proc(n) option remember; local k; if n=1 then 0 else
for k from 1+a(n-1) while searchtext(cat(k), cat(k*
add(i, i=convert(k, base, 10))))=0 do od: k fi
end:
seq(a(n), n=1..75);
PROG
(Python)
n, A326806_list = 0, []
while len(A326806_list) < 10000:
sn = str(n)
if sn in str(n*sum(int(d) for d in sn)):
A326806_list.append(n)
n += 1 # Chai Wah Wu, Oct 19 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Alois P. Heinz, Oct 19 2019
STATUS
approved