A118607 Start with 1 and repeatedly reverse the digits and add 18 to get the next term.
1, 19, 109, 919, 937, 757, 775, 595, 613, 334, 451, 172, 289, 1000, 19, 109, 919, 937, 757, 775, 595, 613, 334, 451, 172, 289, 1000, 19, 109, 919, 937, 757, 775, 595, 613, 334, 451, 172, 289, 1000, 19, 109, 919, 937, 757, 775, 595, 613, 334, 451, 172, 289
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
- 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, 1).
Programs
-
Mathematica
NestList[IntegerReverse[#]+18&,1,60] (* or *) PadRight[{1},120,{1000,19,109,919,937,757,775,595,613,334,451,172,289}] (* Harvey P. Dale, Feb 19 2023 *)
Formula
a(n) = a(n-13) for n >= 15. - Wesley Ivan Hurt, Sep 04 2022
Comments