A103707 Add 8 to each of the preceding digits, beginning with 1.

1, 9, 17, 9, 15, 17, 9, 13, 9, 15, 17, 9, 11, 17, 9, 13, 9, 15, 17, 9, 9, 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, 9, 15, 9, 15, 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

1,2

Links

Table of n, a(n) for n=1..82.

Mathematica

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

Crossrefs

Cf. A103699, A103701, A103702, A103703, A103704, A103705, A103706, A103708.

Sequence in context: A136313 A190322 A184938 * A271641 A292410 A004751

Adjacent sequences: A103704 A103705 A103706 * A103708 A103709 A103710

Keyword

base,nonn

Author

Robert G. Wilson v, Feb 12 2005

Status

approved