A119031 Add and Reverse: a(n) = the reversal of (a(n-1)+d), case a(1)=1 and d=4.

1, 5, 9, 31, 53, 75, 97, 101, 501, 505, 905, 909, 319, 323, 723, 727, 137, 141, 541, 545, 945, 949, 359, 363, 763, 767, 177, 181, 581, 585, 985, 989, 399, 304, 803, 708, 217, 122, 621, 526, 35, 93, 79, 38, 24, 82, 68, 27, 13, 71, 57, 16, 2, 6, 1, 5, 9, 31, 53, 75, 97

Offset

1,2

Comments

Cycle of length 54. [Corrected by N. J. A. Sloane, Aug 02 2009]

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Mathematica

Nest[Append[#, IntegerReverse[#[[-1]] + 4]] &, {1}, 60] (* Michael De Vlieger, Mar 14 2021 *)

Prog

(Python)
def A119031(N=60, a=1, d=4): # optional args: # terms, initial value, increment
   for _ in range(N): yield a; a=int(str(a+d)[::-1])
list(A119031()) # M. F. Hasler, Mar 15 2022
(PARI) a=6; A119031=vector(60, i, a=fromdigits(Vecrev(digits(a+4)))) \\ M. F. Hasler, Mar 15 2022

Crossrefs

All of A003608, A016081, A016082 (and possibly others) eventually reach the trajectory of 1 shown in A119031. Cf. A055198.

Cf. A016081 (case a(1)=3).

Sequence in context: A214902 A049602 A350280 * A271129 A271152 A271164

Adjacent sequences: A119028 A119029 A119030 * A119032 A119033 A119034

Keyword

nonn,base

Author

Zak Seidov, May 09 2006

Status

approved