|
%I #8 Feb 03 2021 19:26:01
%S 1,45,98,133,375,617,760,111,155,595,639,980,133,375,617,760,111,155,
%T 595,639,980,133,375,617,760,111,155,595,639,980,133,375,617,760,111,
%U 155,595,639,980,133,375,617,760,111,155,595,639,980,133,375,617,760
%N Start with 1 and repeatedly reverse the digits and add 44 to get the next term.
%C After 3 steps enters a cycle of length 9.
%H Harvey P. Dale, <a href="/A118090/b118090.txt">Table of n, a(n) for n = 1..1000</a>
%H N. J. A. Sloane and others, <a href="/wiki/Sequences_of_RADD_type">Sequences of RADD type</a>, OEIS wiki.
%t NestList[IntegerReverse[#]+44&,1,60] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Feb 03 2021 *)
%Y Cf. A117828, A117816, A117817.
%K base,nonn
%O 1,2
%A Luc Stevens (lms022(AT)yahoo.com), May 11 2006
|
