VOOZH about

URL: https://oeis.org/A066054

⇱ A066054 - OEIS

login
A066054
'Reverse and Add!' trajectory of 10583.
3
10583, 49084, 97178, 184357, 937838, 1776577, 9533348, 17966707, 88733678, 176367466, 841131137, 1572262285, 7394885036, 13700769973, 51697470704, 92404950319, 183710890748, 1030808908129, 10248906988430, 13737867972631
OFFSET
0,1
LINKS
Harry J. Smith and Vincenzo Librandi, Table of n, a(n) for n = 0..1000 (the first 150 terms from Harry J. Smith)
EXAMPLE
a(1) = 10583 + 38501 = 49084.
MATHEMATICA
NestList[# + FromDigits[Reverse[IntegerDigits[#]]]&, 10583, 40] (* Vincenzo Librandi, May 03 2014 *)
PROG
(ARIBAS): m := 10583; stop := 20; 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;
(PARI) Rev(x)= { local(d, r=0); while (x>0, d=x%10; x\=10; r=r*10 + d); return(r) } { a=10583; for (n = 0, 150, if (n, a+=Rev(a)); write("b066054.txt", n, " ", a) ) } \\ Harry J. Smith, Nov 08 2009
(Haskell)
a066054 n = a066054_list !! n
a066054_list = iterate a056964 10583 -- Reinhard Zumkeller, Sep 22 2011
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Klaus Brockhaus, Nov 30 2001
STATUS
approved