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.
%I A133422 #15 Aug 10 2025 04:18:33
%S A133422 0,1,1,2,1,2,4,3,2,2,12,3,9,5,2,4,6,3,21,3,5,13,6,4,2,10,3,6,10,3,47,
%T A133422 5,13,7,5,4,13,22,10,4,8,6,46,14,3,7,16,5,50,3,7,11,51,4,13,7,22,11,
%U A133422 10,4,9,48,6,6,10,14,19,8,7,6,17,5,10,14,3,23,7,11,17,5,4,9,14,7,7,47,11,15
%N A133422 Number of steps to reach 1 under repeated applications of the "7x+1" map of A133421, or -1 if 1 is never reached.
%C A133422 The 7x+1 map sends x to x/2 if x is even, x/3 if x is divisible by 3, x/5 if x is divisible by 5, otherwise 7x+1.
%H A133422 Tomás Oliveira e Silva, <a href="http://sweet.ua.pt/tos/3x+1.html">The px+1 problem</a>
%H A133422 <a href="/index/3#3x1">Index entries for sequences related to 3x+1 (or Collatz) problem</a>
%t A133422 nxt[x_]:= Which[Mod[x,2]==0,x/2,Mod[x,3]==0,x/3,Mod[x,5]==0,x/5,True,7x+1]; Table[First[First[Position[NestList[nxt,i,100],1]]]-1,{i,88}] (* _Harvey P. Dale_, Dec 27 2007 *)
%Y A133422 Cf. A133421, A133419, ...
%K A133422 nonn,easy
%O A133422 1,4
%A A133422 _N. J. A. Sloane_, Nov 27 2007
%E A133422 More terms from _Harvey P. Dale_, Dec 27 2007
%E A133422 More terms from _Sean A. Irvine_, Mar 29 2010