OFFSET
0,1
COMMENTS
From the 25th term the sequence gets into a cycle of 117.
LINKS
MAPLE
a:= proc(n) option remember; `if`(n<2, 2-n, (p-> parse(cat(seq((c->
`if`(c=0, [][], [c, 9-i][]))(coeff(p, x, 9-i)), i=0..9))))(
add(x^i, i=map(x-> convert(x, base, 10)[], [a(n-1), a(n-2)]))))
end:
seq(a(n), n=0..20); # Alois P. Heinz, Jun 18 2022
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
STATUS
approved