A103701 Add 2 to each of the preceding digits, beginning with 1.

1, 3, 5, 7, 9, 11, 3, 3, 5, 5, 7, 7, 9, 9, 11, 11, 3, 3, 3, 3, 5, 5, 5, 5, 7, 7, 7, 7, 9, 9, 9, 9, 11, 11, 11, 11, 3, 3, 3, 3, 3, 3, 3, 3, 5, 5, 5, 5, 5, 5, 5, 5, 7, 7, 7, 7, 7, 7, 7, 7, 9, 9, 9, 9, 9, 9, 9, 9, 11, 11, 11, 11, 11, 11, 11, 11, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 5, 5, 5, 5, 5, 5

Offset

1,2

Links

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

Mathematica

Flatten[ NestList[ Function[x, Flatten[ IntegerDigits[x] + 2]], {1}, 22]]

Crossrefs

Cf. A103694, A103702, A103703, A103704, A103705, A103706, A103707, A103708.

Sequence in context: A165249 A098160 A371215 * A206544 A122799 A345425

Adjacent sequences: A103698 A103699 A103700 * A103702 A103703 A103704

Keyword

base,nonn

Author

Robert G. Wilson v, Feb 12 2005

Status

approved