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.

This page as a plain text file.
%I A118513 #9 Apr 06 2019 10:42:31
%S A118513 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,
%T A118513 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,
%U A118513 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
%N 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.
%H A118513 N. J. A. Sloane and others, <a href="/wiki/Sequences_of_RADD_type">Sequences of RADD type</a>, OEIS wiki.
%H A118513 <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 0, 0, 0, 0, 0, 0, 1).
%t A118513 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 *)
%t A118513 NestList[IntegerReverse[#]+1&,13,90] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Apr 06 2019 *)
%Y A118513 Cf. A118510, A117831, A117230, A118512.
%K A118513 nonn,base
%O A118513 1,1
%A A118513 _N. J. A. Sloane_, May 06 2006