|
%I #14 Jul 11 2020 05:27:42
%S 99,198,1089,10890,20691,40293,79497,158994,658845,1207701,2284722,
%T 4559544,9019098,17928207,88211178,175322466,839546037,1570191975,
%U 7362102726,13634115363,49985258994,99970517988
%N Trajectory of 99 under map x->x + (x-with-digits-reversed).
%H <a href="/index/Res#RAA">Index entries for sequences related to Reverse and Add!</a>
%F a(n)=A033659(n+1). [From _R. J. Mathar_, Oct 22 2008]
%t NestList[IntegerReverse[#]+#&,99,30] (* The program uses the IntegerReverse function from Mathematica version 10 *) (* _Harvey P. Dale_, Dec 05 2015 *)
%K nonn,base
%O 0,1
%A _N. J. A. Sloane_.
|
