OFFSET
1,10
COMMENTS
Conjecture: No term is zero.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(10) = 14 since f has to be applied 14 times to 10 to arrive at 130, a multiple of 10.
MAPLE
f:= n -> n + convert(convert(n, base, 10), `+`):
g:= proc(n) local j, t;
t:= n;
for j from 1 do
t:= f(t);
if t mod n = 0 then return j fi
od
end proc:
map(g, [$1..100]); # Robert Israel, May 14 2019
CROSSREFS
KEYWORD
AUTHOR
Ray Chandler, Dec 19 2004
STATUS
approved