A118616 Start with 1 and repeatedly reverse the digits and add 29 to get the next term.
1, 30, 32, 52, 54, 74, 76, 96, 98, 118, 840, 77, 106, 630, 65, 85, 87, 107, 730, 66, 95, 88, 117, 740, 76, 96, 98, 118, 840, 77, 106, 630, 65, 85, 87, 107, 730, 66, 95, 88, 117, 740, 76, 96, 98, 118, 840, 77, 106, 630, 65, 85, 87, 107, 730, 66, 95, 88, 117, 740, 76, 96, 98
Offset: 1
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, 1).
Programs
-
Mathematica
NestList[29+IntegerReverse[#]&,1,70] (* or *) PadRight[{1,30,32,52,54,74},70,{730,66,95,88,117,740,76,96,98,118,840,77,106,630,65,85,87,107}] (* Harvey P. Dale, Apr 29 2022 *)
Comments