[go: up one dir, main page]

login
A118216
Start with 1 and repeatedly reverse the digits and add 69 to get the next term.
0
1, 70, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136, 700, 76, 136
OFFSET
1,2
LINKS
N. J. A. Sloane and others, Sequences of RADD type, OEIS wiki.
EXAMPLE
After 2 steps enters a cycle of 3.
MATHEMATICA
NestList[FromDigits[Reverse[IntegerDigits[#]]]+69&, 1, 70] (* or *) PadRight[{1, 70}, 70, {136, 700, 76}] (* Harvey P. Dale, Mar 26 2015 *)
CROSSREFS
KEYWORD
base,nonn,less
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), May 14 2006
STATUS
approved