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 A375910 #13 Sep 04 2024 12:45:57
%S A375910 1,4,9,48,13,41,61,24,30,72,69,151,86,40,53,538,74,128,109,100,110,
%T A375910 182,69,507,135,81,93,395,129,217,599,132,139,249,220,460,182,161,177,
%U A375910 850,121,340,267,140,158,448,631,1625,232,173,182,708,233,389,504,220,242,428
%N A375910 Row sums of A350279.
%C A375910 1
%H A375910 Paolo Xausa, <a href="/A375910/b375910.txt">Table of n, a(n) for n = 1..10000</a>
%F A375910 a(n) = Sum_{k = 1..A375909(n) + 1} A350279(n,k).
%t A375910 FarkasStep[x_] := Which[Divisible[x, 3], x/3, Mod[x, 4] == 3, (3*x + 1)/2, True, (x + 1)/2];
%t A375910 Array[Total[FixedPointList[FarkasStep, 2*# - 1]] - 1 &, 100]
%Y A375910 Cf. A349407, A350279, A375909, A375911.
%Y A375910 Cf. A033493, A285098.
%K A375910 nonn,easy
%O A375910 1,2
%A A375910 _Paolo Xausa_, Sep 02 2024