A033651 Trajectory of 9 under map x->x + (x-with-digits-reversed).

9, 18, 99, 198, 1089, 10890, 20691, 40293, 79497, 158994, 658845, 1207701, 2284722, 4559544, 9019098, 17928207, 88211178, 175322466, 839546037, 1570191975, 7362102726, 13634115363, 49985258994, 99970517988, 188942025987, 978462275868, 1847034540747, 9317488848228

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• base

Comments

Trajectories of 27, 36, 45, 54, 63, 72, 81, 90, ..., 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!

Crossrefs

Cf. A006960, A001127, A033648, A033649, A033650.

Cf. A056964, A004086.

Row n=9 of A243238.

Partial sums of A112296.

Programs

Haskell

a063051 n = a063051_list !! n
a063051_list = iterate a056964 879 -- Reinhard Zumkeller, Sep 22 2011

Maple

a:= proc(n) option remember; `if`(n=0, 9, (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@# &, 9, 26] (* Robert G. Wilson v *)