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,1

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

Formula

Has period 90. A full period is shown.

Mathematica

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

Crossrefs

Cf. A117830, A117828.

Sequence in context: A261291 A335969 A225717 * A223089 A167807 A118879

Adjacent sequences: A117804 A117805 A117806 * A117808 A117809 A117810

Keyword

nonn,base

Author

Klaus Brockhaus, May 05 2006

Status

approved