cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A118513 Define sequence S_m by: initial term = m, reverse digits and add 1 to get next term. Entry shows S_13. This reaches a cycle of length 9 in 15 steps.

Original entry on oeis.org

13, 32, 24, 43, 35, 54, 46, 65, 57, 76, 68, 87, 79, 98, 90, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10
Offset: 1

Views

Author

N. J. A. Sloane, May 06 2006

Keywords

Crossrefs

Programs

  • Mathematica
    Join[{13,32,24,43,35,54,46,65,57,76,68,87,79,98,90},LinearRecurrence[{0,0,0,0,0,0,0,0,1},{10,2,3,4,5,6,7,8,9},73]] (* Ray Chandler, Jul 18 2015 *)
    NestList[IntegerReverse[#]+1&,13,90] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 06 2019 *)