login
A375268
Row sums of A375266.
2
1, 3, 4, 7, 36, 9, 288, 15, 13, 46, 259, 19, 119, 302, 51, 31, 214, 27, 519, 66, 309, 281, 633, 39, 658, 145, 40, 330, 442, 76, 101104, 63, 292, 248, 540, 55, 535, 557, 158, 106, 101331, 344, 1338, 325, 96, 679, 100979, 79, 806, 708, 265, 197, 399, 81, 102316, 386
OFFSET
1,2
FORMULA
a(n) = Sum_{k = 1..A375267(n) + 1} A375266(n,k).
MATHEMATICA
A375265[n_] := Which[Divisible[n, 3], n/3, Divisible[n, 2], n/2, True, 3*n + 1];
Array[Total[NestWhileList[A375265, #, # > 1 &]] &, 100]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Aug 09 2024
STATUS
approved