A118238 Start with 15 and repeatedly reverse the digits and add 1 to get the next term.
15, 52, 26, 63, 37, 74, 48, 85, 59, 96, 70, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10
Offset: 1
Links
- N. J. A. Sloane and others, Sequences of RADD type, OEIS wiki.
Crossrefs
Cf. A118551.
Programs
-
Mathematica
NestList[FromDigits[Reverse[IntegerDigits[#]]]+1&,15,100] (* Harvey P. Dale, Jul 26 2015 *)
Comments