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,2

Comments

For the limiting ratio of consecutive terms, see A274192.

Links

Table of n, a(n) for n=0..41.

Example

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.

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}]

Crossrefs

Cf. A274183, A274192.

Sequence in context: A281578 A173199 A023435 * A091501 A286271 A083198

Adjacent sequences: A274181 A274182 A274183 * A274185 A274186 A274187

Keyword

nonn,easy

Author

Clark Kimberling, Jun 13 2016

Status

approved