A118254 Start with 16 and repeatedly reverse the digits and add 1 to get the next term.
16, 62, 27, 73, 38, 84, 49, 95, 60, 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, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3
Offset: 1
Links
- N. J. A. Sloane and others, Sequences of RADD type, OEIS wiki.
Crossrefs
Cf. A118551.
Programs
-
Mathematica
NestList[IntegerReverse[#]+1&,16,100] (* or *) PadRight[{16,62,27,73,38,84,49,95,60},100,{7,8,9,10,2,3,4,5,6}] (* Harvey P. Dale, May 15 2025 *)
Comments