OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(15) = 15 + 5 = 20 because sod(15,10) = 6 and sod(15,6) = 5 (because 15 = 23_6).
MAPLE
sod:= proc(x, b) if b=1 then x else convert(convert(x, base, b), `+`) fi end proc:
f:= x -> x + sod(x, sod(x, 10)):
map(f, [$1..100]);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Robert Israel, Dec 08 2020
STATUS
approved