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.

A259193 5x + 1 sequence beginning at 11.

This page as a plain text file.
%I A259193 #23 Sep 08 2022 08:46:13
%S A259193 11,56,28,14,7,36,18,9,46,23,116,58,29,146,73,366,183,916,458,229,
%T A259193 1146,573,2866,1433,7166,3583,17916,8958,4479,22396,11198,5599,27996,
%U A259193 13998,6999,34996,17498,8749,43746,21873,109366,54683,273416,136708,68354,34177,170886,85443
%N A259193 5x + 1 sequence beginning at 11.
%H A259193 Alonso del Arte, <a href="/A259193/b259193.txt">Table of n, a(n) for n = 0..999</a>
%H A259193 Alex V. Kontorovich & Jeffrey C. Lagarias, <a href="http://arxiv.org/abs/0910.1944">Stochastic Models for the 3x+1 and 5x+1 Problems</a> arXiv:0910.1944 [math.NT], 2009.
%F A259193 a(0) = 11; a(n) = 5a(n - 1) + 1 if a(n - 1) is odd, a(n) = a(n - 1)/2 otherwise.
%e A259193 11 is odd, so it's followed by 5 * 11 + 1 = 56.
%e A259193 56 is even, so it's followed by 56/2 = 28.
%t A259193 NestList[If[EvenQ[#], #/2, 5# + 1] &, 5, 100]
%o A259193 (Magma) [n eq 1 select 11 else IsOdd(Self(n-1)) select 5*Self(n-1)+1 else Self(n-1) div 2: n in [1..80]]; // _Vincenzo Librandi_, Jul 04 2015
%Y A259193 Cf. A259207, A057688.
%K A259193 nonn,easy
%O A259193 0,1
%A A259193 _Alonso del Arte_, Jun 21 2015