[go: up one dir, main page]

login
A033650
Trajectory of 7 under map x --> x + (x-with-digits-reversed).
8
7, 14, 55, 110, 121, 242, 484, 968, 1837, 9218, 17347, 91718, 173437, 907808, 1716517, 8872688, 17735476, 85189247, 159487405, 664272356, 1317544822, 3602001953, 7193004016, 13297007933, 47267087164, 93445163438, 176881317877, 955594506548, 1801200002107
OFFSET
0,1
COMMENTS
A Reverse and Add! sequence.
Trajectories of 19, 23, 28, 29, 32, 37, 38, 41, 46, 47, 49, 50, ..., merge into this sequence. - Robert G. Wilson v, Dec 16 2005
A Reverse and Add! sequence.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000 (first 251 terms from Reinhard Zumkeller)
MAPLE
a:= proc(n) option remember; `if`(n=0, 7, (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@# &, 7, 26] (* Robert G. Wilson v *)
PROG
(Haskell)
a033650 n = a033650_list !! n
a033650_list = iterate a056964 7 -- Reinhard Zumkeller, Sep 22 2011
CROSSREFS
KEYWORD
nonn,base
STATUS
approved