login
A103698
Add 6 to each of the preceding digits, beginning with 0.
9
0, 6, 12, 7, 8, 13, 14, 7, 9, 7, 10, 13, 15, 13, 7, 6, 7, 9, 7, 11, 7, 9, 13, 12, 13, 15, 13, 7, 7, 13, 15, 7, 9, 7, 8, 7, 9, 7, 11, 7, 9, 13, 13, 7, 9, 7, 11, 13, 15, 13, 14, 13, 15, 13, 7, 7, 13, 15, 7, 9, 7, 9, 13, 15, 13, 7, 7, 7, 9, 7, 11, 7, 9, 7, 10, 7, 9, 7, 11, 7, 9, 13, 13, 7, 9, 7, 11
OFFSET
0,2
MATHEMATICA
Flatten[ NestList[ Function[x, Flatten[ IntegerDigits[x] + 6]], {0}, 11]]
KEYWORD
base,nonn
AUTHOR
Robert G. Wilson v, Feb 12 2005
STATUS
approved