A274184 Length of row n of the array in A274183.

1, 2, 3, 5, 7, 11, 16, 24, 35, 52, 77, 114, 168, 249, 368, 545, 806, 1194, 1768, 2619, 3879, 5747, 8514, 12615, 18692, 27698, 41045, 60826, 90141, 133589, 197981, 293417, 434861, 644497, 955202, 1415703, 2098222, 3109803, 4609098, 6831253, 10124787, 15006259

Offset: 0

Author

Clark Kimberling, Jun 13 2016

Keywords

• nonn
• easy

Comments

For the limiting ratio of consecutive terms, see A274192.

Examples

			First six rows of A274183:
0
1   0
2   1   0
3   2   1   1   0
4   3   2   2   1   1   0
5   4   3   3   2   2   1   2   1   1   0,
with lengths 1, 2, 3, 5, 7, 11.
		

Crossrefs

Cf. A274183, A274192.

Programs

Mathematica

g[0] = {0}; g[n_] := Join[g[n - 1] + 1, (1/2) Select[g[n - 1], IntegerQ[#/2] &]];
Table[Length[g[n]], {n, 0, 15}]