A033649 Trajectory of 5 under map x->x + (x-with-digits-reversed).

5, 10, 11, 22, 44, 88, 176, 847, 1595, 7546, 14003, 44044, 88088, 176176, 847847, 1596595, 7553546, 14007103, 44177144, 88354288, 176599676, 853595347, 1597190705, 6668108656, 13236127322, 35608290553

Offset

0,1

Comments

Trajectories of 15, 21, 24, 30, 39, 42, 48, 51, 57, 60, 69, 75, 78, 84, 87, 93, 96, ..., merge into this sequence. - Robert G. Wilson v, Dec 16 2005

A Reverse and Add! sequence.

Trajectories of 13, 17, 20, 26, 31, 35, 40, 53, 62, 71, 79, 80, 97, ..., merge into this sequence. - Robert G. Wilson v, Dec 16 2005

Links

Alois P. Heinz, Table of n, a(n) for n = 0..1000 (first 251 terms from Reinhard Zumkeller)

Index entries for sequences related to Reverse and Add!

Maple

a:= proc(n) option remember; `if`(n=0, 5, (h-> h+ (s->
      parse(cat(s[-i]$i=1..length(s))))(""||h))(a(n-1)))
    end:
seq(a(n), n=0..40);  # Alois P. Heinz, Jun 18 2014

Mathematica

NestList[ # + FromDigits@Reverse@IntegerDigits@# &, 5, 29] (* Robert G. Wilson v, Dec 16 2005 *)

Prog

(Haskell)
a033649 n = a033649_list !! n
a033649_list = iterate a056964 5 -- Reinhard Zumkeller, Sep 22 2011

Crossrefs

Cf. A006960, A001127, A033648, A033650, A033651.

Cf. A056964, A004086.

Row n=5 of A243238.

Sequence in context: A004757 A007527 A033894 * A271922 A271920 A329773

Adjacent sequences: A033646 A033647 A033648 * A033650 A033651 A033652

Keyword

nonn,base

Author

N. J. A. Sloane

Status

approved