A103699 Add 8 to each of the preceding digits, beginning with 0.

0, 8, 16, 9, 14, 17, 9, 12, 9, 15, 17, 9, 10, 17, 9, 13, 9, 15, 17, 9, 8, 9, 15, 17, 9, 11, 17, 9, 13, 9, 15, 17, 16, 17, 9, 13, 9, 15, 17, 9, 9, 9, 15, 17, 9, 11, 17, 9, 13, 9, 15, 9, 14, 9, 15, 17, 9, 11, 17, 9, 13, 9, 15, 17, 17, 17, 9, 13, 9, 15, 17, 9, 9, 9, 15, 17, 9, 11, 17, 9, 13, 17

Offset

0,2

Links

Table of n, a(n) for n=0..81.

Mathematica

Flatten[ NestList[ Function[x, Flatten[ IntegerDigits[x] + 8]], {0}, 9]]

Crossrefs

Cf. A102654, A103693, A103694, A103695, A103696, A103697, A103698, A103700.

Sequence in context: A037239 A205869 A217178 * A238835 A040056 A242890

Adjacent sequences: A103696 A103697 A103698 * A103700 A103701 A103702

Keyword

base,nonn

Author

Robert G. Wilson v, Feb 12 2005

Status

approved