OFFSET
0,1
LINKS
Reinhard Zumkeller and Michael Lee, Table of n, a(n) for n = 0..2383 (terms 0 through 250 provided by Reinhard Zumkeller)
EXAMPLE
a(1) = 10563 + 36501 = 47064.
MATHEMATICA
NestList[# + FromDigits[Reverse[IntegerDigits[#]]]&, 10563, 30] (* Vincenzo Librandi, May 03 2014 *)
PROG
(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;
(Haskell)
a063063 n = a063063_list !! n
a063063_list = iterate a056964 10563 -- Reinhard Zumkeller, Sep 22 2011
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Klaus Brockhaus, Jul 07 2001
STATUS
approved