login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

a(n) = 18*n - 1, n >= 1, the second column of triangle A239127 related to the Collatz problem.
5

%I #18 Sep 01 2018 21:44:41

%S 17,35,53,71,89,107,125,143,161,179,197,215,233,251,269,287,305,323,

%T 341,359,377,395,413,431,449,467,485,503,521,539,557,575,593,611,629,

%U 647,665,683,701,719,737,755,773,791,809,827,845,863,881

%N a(n) = 18*n - 1, n >= 1, the second column of triangle A239127 related to the Collatz problem.

%C This sequence gives all ending values a(n) (in increasing order) of Collatz sequences of length 5 following the pattern (ud)^2, with u (for `up'), mapping an odd number m to 3*m+1, and d (for `down'), mapping an even number m to m/2. The last entry of this sequence is required to be odd. The first entry is also odd and is given by M(2,n) = 8*n-1 from the array A239126.

%C This appears as N in Example 2.2. for x=y = 2 in the M. Trümper paper on p. 7, given as a link below.

%H Vincenzo Librandi, <a href="/A239129/b239129.txt">Table of n, a(n) for n = 1..1000</a>

%H Wolfdieter Lang, <a href="https://cs.uwaterloo.ca/journals/JIS/VOL17/Lang/lang6.html">On Collatz' Words, Sequences, and Trees</a>, J. of Integer Sequences, Vol. 17 (2014), Article 14.11.7.

%H Manfred Trümper, <a href="http://dx.doi.org/10.1155/2014/756917">The Collatz Problem in the Light of an Infinite Free Semigroup</a>, Chinese Journal of Mathematics, Vol. 2014, Article ID 756917, 21 pages.

%F a(n) = 18*n - 1 for n >= 1.

%F O.g.f.: x*(x+17)/(1-x)^2.

%e a(1) = 17 because the Collatz sequence for M(2,1) = 8*1 - 1 = 7 from A239126 is [7, 22, 11, 34, 17] ending in the odd number 17.

%e a(4) = 71 with the Collatz sequence of length 5 starting with M(2,4) = 31 given by [31, 94, 47, 142, 71], ending in a(4).

%t CoefficientList[Series[(x + 17)/(1 - x)^2, {x, 0, 40}], x] (* _Vincenzo Librandi_, Mar 16 2014 *)

%Y Cf. A239127, A016969 (first column), A239126.

%K nonn,easy

%O 1,1

%A _Wolfdieter Lang_, Mar 13 2014