A118216 Start with 1 and repeatedly reverse the digits and add 69 to get the next term.
1, 70, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136
Offset: 1
Examples
After 2 steps enters a cycle of 3.
Links
- N. J. A. Sloane and others, Sequences of RADD type, OEIS wiki.
Programs
-
Mathematica
NestList[FromDigits[Reverse[IntegerDigits[#]]]+69&,1,70] (* or *) PadRight[{1,70},70,{136,700,76}] (* Harvey P. Dale, Mar 26 2015 *)