A375268 Row sums of A375266.

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

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000

Index entries for sequences related to 3x+1 (or Collatz) problem.

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

Cf. A375265, A375266, A375267, A375280.

Cf. A033493, A285098.

Sequence in context: A042173 A317811 A046461 * A084590 A279920 A041135

Adjacent sequences: A375265 A375266 A375267 * A375269 A375270 A375271

Keyword

nonn,easy

Author

Paolo Xausa, Aug 09 2024

Status

approved