|
|
A118157
|
|
Start with 1 and repeatedly reverse the digits and add 62 to get the next term.
|
|
0
|
|
|
1, 63, 98, 151, 213, 374, 535, 597, 857, 820, 90, 71, 79, 159, 1013, 3163, 3675, 5825, 5347, 7497, 8009, 9070, 771, 239, 994, 561, 227, 784, 549, 1007, 7063, 3669, 9725, 5341, 1497, 8003, 3070, 765, 629, 988, 951, 221, 184, 543, 407, 766, 729, 989, 1051
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
After 65 steps enters a cycle of 27. Cycle : 80, 70, 69, 158, 913, 381, 245, 604, 468, 926, 691, 258, 914, 481, 246, 704, 469, 1026, 6263, 3688, 8925, 5360, 697, 858, 920, 91, 81,...
|
|
LINKS
|
|
|
MATHEMATICA
|
NestList[IntegerReverse[#]+62&, 1, 50] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 30 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn,less
|
|
AUTHOR
|
Luc Stevens (lms022(AT)yahoo.com), May 14 2006
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|