A117807 Start with 1015 and repeatedly reverse the digits and add 4 to get the next term.

1015, 5105, 5019, 9109, 9023, 3213, 3127, 7217, 7131, 1321, 1235, 5325, 5239, 9329, 9243, 3433, 3347, 7437, 7351, 1541, 1455, 5545, 5459, 9549, 9463, 3653, 3567, 7657, 7571, 1761, 1675, 5765, 5679, 9769, 9683, 3873, 3787, 7877, 7791, 1981, 1895, 5985, 5899, 9989, 9903, 3103, 3017, 7107, 7021, 1211, 1125, 5215, 5129, 9219, 9133, 3323, 3237, 7327, 7241, 1431, 1345, 5435, 5349, 9439, 9353, 3543, 3457, 7547, 7461, 1651, 1565, 5655, 5569, 9659, 9573, 3763, 3677, 7767, 7681, 1871, 1785, 5875, 5789, 9879, 9793, 3983, 3897, 7987, 7901, 1101

Offset: 1

Author

Klaus Brockhaus, May 05 2006

Keywords

• nonn
• base

Links

• 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).

Crossrefs

Cf. A117830, A117828.

Programs

Mathematica

NestList[FromDigits[Reverse[IntegerDigits[#]]]+4&,1015,90] (* Harvey P. Dale, Jul 18 2015 *)

Formula

Has period 90. A full period is shown.