A118297 Start with 22 and repeatedly reverse the digits and add 1 to get the next term.
22, 23, 33, 34, 44, 45, 55, 56, 66, 67, 77, 78, 88, 89, 99, 100, 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
Offset: 1
Links
- N. J. A. Sloane and others, Sequences of RADD type, OEIS wiki.
Crossrefs
Cf. A118551.
Programs
-
Mathematica
NestList[IntegerReverse[#]+1&,22,100] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 30 2018 *)
Comments