A118533 Start with 1 and repeatedly reverse the digits and add 16 to get the next term.
1, 17, 87, 94, 65, 72, 43, 50, 21, 28, 98, 105, 517, 731, 153, 367, 779, 993, 415, 530, 51, 31, 29, 108, 817, 734, 453, 370, 89, 114, 427, 740, 63, 52, 41, 30, 19, 107, 717, 733, 353, 369, 979, 995, 615, 532, 251, 168, 877, 794, 513, 331, 149, 957
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, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
Programs
-
Mathematica
NestList[FromDigits[Reverse[IntegerDigits[#]]]+16&,1,60] (* Harvey P. Dale, Jul 19 2011 *)
Formula
After 721 steps enters a cycle of length 90.