|
| |
|
|
A063054
|
|
'Reverse and Add!' trajectory of 1997.
|
|
3
| |
|
|
1997, 9988, 18887, 97768, 184547, 930028, 1750067, 9350638, 17711177, 94822948, 179745797, 977293768, 1844686547, 9301551028, 17503102067, 93523232638, 177146465177, 948711106948, 1798312224797, 9772534363768, 18446168716547
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
LINKS
| Reinhard Zumkeller, Table of n, a(n) for n = 0..250
Index entries for sequences related to Reverse and Add!
|
|
|
EXAMPLE
| a(1) = 1997 + 7991 = 9988.
|
|
|
MATHEMATICA
| NestList[ #+FromDigits[ Reverse[ IntegerDigits[ # ] ] ]&, 1997, 25 ]
|
|
|
PROG
| (ARIBAS): m := 1997; 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)
a063054 n = a063054_list !! n
a063054_list = iterate a056964 1997 -- Reinhard Zumkeller, Sep 22 2011
|
|
|
CROSSREFS
| A033865, A023108, A006960, A063055.
Cf. A056964, A004086.
Sequence in context: A034588 A079012 A063472 * A171467 A031808 A167292
Adjacent sequences: A063051 A063052 A063053 * A063055 A063056 A063057
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jul 07 2001
|
| |
|
|
