OFFSET
1,2
COMMENTS
For n > 1, 3 <= a(n) <= 11 by definition. Also subsequences with repeating terms may be arbitrarily long. What about any other patterns, periods, etc.?
MATHEMATICA
a[1]=i=s=1; Do[i++; b=2+Max[IntegerDigits[s]]; a[i]=b; s+=b, {145}]; Table[a[k], {k, i}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Oct 31 2007
STATUS
approved