A118617 Start with 1 and repeatedly reverse the digits and add 31 to get the next term.
1, 32, 54, 76, 98, 120, 52, 56, 96, 100, 32, 54, 76, 98, 120, 52, 56, 96, 100, 32, 54, 76, 98, 120, 52, 56, 96, 100, 32, 54, 76, 98, 120, 52, 56, 96, 100, 32, 54, 76, 98, 120, 52, 56, 96, 100, 32, 54, 76, 98, 120, 52, 56, 96, 100, 32, 54, 76, 98, 120, 52, 56, 96, 100, 32, 54
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, 1).
Programs
-
Mathematica
NestList[FromDigits[Reverse[IntegerDigits[#]]]+31&,1,70] (* Harvey P. Dale, Dec 25 2012 *) NestList[IntegerReverse[#]+31&,1,70] (* Harvey P. Dale, Aug 28 2021 *)
Comments