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.

A198591 Odd numbers producing 8 odd numbers in the Collatz iteration.

This page as a plain text file.
%I A198591 #7 Mar 30 2012 17:23:03
%S A198591 25,49,51,99,101,197,205,217,397,405,433,435,441,475,789,821,833,857,
%T A198591 867,869,875,883,951,953,955,1589,1621,1649,1667,1713,1715,1733,1741,
%U A198591 1751,1765,1785,1901,1907,1911,3157,3185,3285,3299,3333,3427,3429,3469,3477
%N A198591 Odd numbers producing 8 odd numbers in the Collatz iteration.
%H A198591 Vincenzo Librandi, <a href="/A198591/b198591.txt">Table of n, a(n) for n = 1..1938</a>
%t A198591 Collatz[n_] := NestWhileList[If[EvenQ[#], #/2, 3 # + 1] &, n, # > 1 &]; t = {}; Do[If[Length[Select[Collatz[n], OddQ]] == 8, AppendTo[t, n]], {n, 1, 10000, 2}]; t
%Y A198591 Cf. A198584.
%K A198591 nonn
%O A198591 1,1
%A A198591 _T. D. Noe_, Oct 31 2011