A119455 Start with 1027 and repeatedly reverse the digits and add 16 to get the next term.

1027, 7217, 7143, 3433, 3359, 9549, 9475, 5765, 5691, 1981, 1907, 7107, 7033, 3323, 3249, 9439, 9365, 5655, 5581, 1871, 1797, 7987, 7913, 3213, 3139, 9329, 9255, 5545, 5471, 1761, 1687, 7877, 7803, 3103, 3029, 9219, 9145, 5435, 5361, 1651, 1577, 7767, 7693, 3983, 3909, 9109, 9035, 5325, 5251, 1541, 1467, 7657, 7583, 3873, 3799, 9989, 9915, 5215, 5141, 1431, 1357, 7547, 7473, 3763, 3689, 9879, 9805, 5105, 5031, 1321, 1247, 7437, 7363, 3653, 3579, 9769, 9695, 5985, 5911, 1211, 1137, 7327, 7253, 3543, 3469, 9659, 9585, 5875, 5801, 1101

Offset

1,1

Comments

Has period 90. A full period is shown. Starting with 1027 + 2*k for k = 1, ..., 18 gives other sequences with period 90.

Links

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

N. J. A. Sloane and others, Sequences of RADD type, OEIS wiki.

Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).

Mathematica

NestList[FromDigits[Reverse[IntegerDigits[#]]]+16&, 1027, 90] (* Harvey P. Dale, Mar 11 2015 *)

Crossrefs

Cf. A118533, A119451, A117807.

Sequence in context: A235692 A247947 A066133 * A252772 A168189 A045031

Adjacent sequences: A119452 A119453 A119454 * A119456 A119457 A119458

Keyword

nonn,base

Author

Klaus Brockhaus, May 20 2006

Status

approved