A118620 Start with 1 and repeatedly reverse the digits and add 45 to get the next term.
1, 46, 109, 946, 694, 541, 190, 136, 676, 721, 172, 316, 658, 901, 154, 496, 739, 982, 334, 478, 919, 964, 514, 460, 109, 946, 694, 541, 190, 136, 676, 721, 172, 316, 658, 901, 154, 496, 739, 982, 334, 478, 919, 964, 514, 460, 109, 946, 694, 541, 190, 136, 676, 721, 172
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,1).
Programs
-
Mathematica
NestList[IntegerReverse[#]+45&,1,60] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 09 2020 *)
Extensions
New a(5)=a(27)=a(49)=694 inserted by Georg Fischer, Jul 17 2020
Comments