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 A186701 #8 Mar 07 2013 12:29:28
%S A186701 1,3,11,14,20,29,46,50,70,77,92,102,112,130,148,153,166,187,208,216,
%T A186701 224,240,256,267,291,302,414,433,452,471,578,584,611,625,639,661,683,
%U A186701 705,740,749,859,868,898,915,932,949,1054,1066,1091,1116,1141,1153
%N A186701 Partial sums of Collatz sequence (A008908).
%H A186701 T. D. Noe, <a href="/A186701/b186701.txt">Table of n, a(n) for n = 1..1000</a>
%t A186701 Accumulate[Table[Length[NestWhileList[If[EvenQ[#],#/2,3#+1]&,n,#!=1&]],{n,100}]]
%Y A186701 Cf. A008908.
%K A186701 nonn
%O A186701 1,2
%A A186701 _Harvey P. Dale_, Feb 25 2011