%I #19 May 03 2014 07:20:28
%S 10563,47064,93138,176277,948948,1798797,9777768,18455547,93011028,
%T 175022067,935242638,1771485177,9487326948,17983564797,97730103768,
%U 184460207547,930162272028,1750434533067,9353788873638,17717577747177
%N 'Reverse and Add!' trajectory of 10563.
%H Reinhard Zumkeller and Michael Lee, <a href="/A063063/b063063.txt">Table of n, a(n) for n = 0..2383</a> (terms 0 through 250 provided by Reinhard Zumkeller)
%H <a href="/index/Res#RAA">Index entries for sequences related to Reverse and Add!</a>
%e a(1) = 10563 + 36501 = 47064.
%t NestList[# + FromDigits[Reverse[IntegerDigits[#]]]&, 10563, 30] (* _Vincenzo Librandi_, May 03 2014 *)
%o (ARIBAS): m := 10563; stop := 25; c := 0; rev := int_reverse(m); while m <> rev and c < stop do inc(c); write(m," "); m := m + rev; rev := int_reverse(m); end;
%o (Haskell)
%o a063063 n = a063063_list !! n
%o a063063_list = iterate a056964 10563 -- _Reinhard Zumkeller_, Sep 22 2011
%Y A033865, A023108, A006960, A063064.
%Y Cf. A056964, A004086.
%K base,nonn
%O 0,1
%A _Klaus Brockhaus_, Jul 07 2001