A118864 Start with 1 and repeatedly place the first digit at the end of the number and add 17.

1, 18, 98, 106, 78, 104, 58, 102, 38, 100, 18, 98, 106, 78, 104, 58, 102, 38, 100, 18, 98, 106, 78, 104, 58, 102, 38, 100, 18, 98, 106, 78, 104, 58, 102, 38, 100, 18, 98, 106, 78, 104, 58, 102, 38, 100, 18, 98, 106, 78, 104, 58, 102, 38, 100, 18, 98, 106, 78, 104, 58

Offset

1,2

Comments

After 1 step the sequence enters a cycle of length 9.

Links

Table of n, a(n) for n=1..61.

Mathematica

NestList[FromDigits[RotateLeft[IntegerDigits[#]]]+17&, 1, 60] (* or *) PadRight[{1}, 100, {100, 18, 98, 106, 78, 104, 58, 102, 38}] (* Harvey P. Dale, Dec 21 2016 *)

Crossrefs

Sequence in context: A264202 A338783 A324304 * A118606 A318063 A177371

Adjacent sequences: A118861 A118862 A118863 * A118865 A118866 A118867

Keyword

base,nonn

Author

Luc Stevens (lms022(AT)yahoo.com), May 24 2006

Status

approved