cp's OEIS Frontend

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

%I A033649 #28 Oct 27 2023 19:59:34
%S A033649 5,10,11,22,44,88,176,847,1595,7546,14003,44044,88088,176176,847847,
%T A033649 1596595,7553546,14007103,44177144,88354288,176599676,853595347,
%U A033649 1597190705,6668108656,13236127322,35608290553
%N A033649 Trajectory of 5 under map x->x + (x-with-digits-reversed).
%C A033649 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
%C A033649 A Reverse and Add! sequence.
%C A033649 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
%H A033649 Alois P. Heinz, <a href="/A033649/b033649.txt">Table of n, a(n) for n = 0..1000</a> (first 251 terms from Reinhard Zumkeller)
%H A033649 <a href="/index/Res#RAA">Index entries for sequences related to Reverse and Add!</a>
%p A033649 a:= proc(n) option remember; `if`(n=0, 5, (h-> h+ (s->
%p A033649       parse(cat(s[-i]$i=1..length(s))))(""||h))(a(n-1)))
%p A033649     end:
%p A033649 seq(a(n), n=0..40);  # _Alois P. Heinz_, Jun 18 2014
%t A033649 NestList[ # + FromDigits@Reverse@IntegerDigits@# &, 5, 29] (* _Robert G. Wilson v_, Dec 16 2005 *)
%o A033649 (Haskell)
%o A033649 a033649 n = a033649_list !! n
%o A033649 a033649_list = iterate a056964 5 -- _Reinhard Zumkeller_, Sep 22 2011
%Y A033649 Cf. A006960, A001127, A033648, A033650, A033651.
%Y A033649 Cf. A056964, A004086.
%Y A033649 Row n=5 of A243238.
%K A033649 nonn,base
%O A033649 0,1
%A A033649 _N. J. A. Sloane_