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 A375268 #12 Aug 16 2024 04:28:04
%S A375268 1,3,4,7,36,9,288,15,13,46,259,19,119,302,51,31,214,27,519,66,309,281,
%T A375268 633,39,658,145,40,330,442,76,101104,63,292,248,540,55,535,557,158,
%U A375268 106,101331,344,1338,325,96,679,100979,79,806,708,265,197,399,81,102316,386
%N A375268 Row sums of A375266.
%H A375268 Paolo Xausa, <a href="/A375268/b375268.txt">Table of n, a(n) for n = 1..10000</a>
%H A375268 <a href="/index/3#3x1">Index entries for sequences related to 3x+1 (or Collatz) problem</a>.
%F A375268 a(n) = Sum_{k = 1..A375267(n) + 1} A375266(n,k).
%t A375268 A375265[n_] := Which[Divisible[n, 3], n/3, Divisible[n, 2], n/2, True, 3*n + 1];
%t A375268 Array[Total[NestWhileList[A375265, #, # > 1 &]] &, 100]
%Y A375268 Cf. A375265, A375266, A375267, A375280.
%Y A375268 Cf. A033493, A285098.
%K A375268 nonn,easy
%O A375268 1,2
%A A375268 _Paolo Xausa_, Aug 09 2024