login
A375910
Row sums of A350279.
2
1, 4, 9, 48, 13, 41, 61, 24, 30, 72, 69, 151, 86, 40, 53, 538, 74, 128, 109, 100, 110, 182, 69, 507, 135, 81, 93, 395, 129, 217, 599, 132, 139, 249, 220, 460, 182, 161, 177, 850, 121, 340, 267, 140, 158, 448, 631, 1625, 232, 173, 182, 708, 233, 389, 504, 220, 242, 428
OFFSET
1,2
COMMENTS
1
FORMULA
a(n) = Sum_{k = 1..A375909(n) + 1} A350279(n,k).
MATHEMATICA
FarkasStep[x_] := Which[Divisible[x, 3], x/3, Mod[x, 4] == 3, (3*x + 1)/2, True, (x + 1)/2];
Array[Total[FixedPointList[FarkasStep, 2*# - 1]] - 1 &, 100]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Sep 02 2024
STATUS
approved