OFFSET
0,3
COMMENTS
Let g(0) = (0) and for n > 0, define g(n) inductively to be the concatenation of g(n-1) and the numbers (k-1)/2 as k ranges through the odd numbers k in g(n-1). Every nonnegative integer appears infinitely many times. For the limiting ratio of lengths of consecutive rows, see A274192.
EXAMPLE
First seven rows:
0
1
2 0
3 1
4 2 1 0
5 3 2 1 0
6 4 3 2 1 2 1 0
MATHEMATICA
g[0] = {0}; z = 14; g[n_] := g[n] = Join[g[n - 1] + 1, (1/2) (Select[g[n - 1], IntegerQ[(# - 1)/2] &] - 1)]; Flatten[Table[g[n], {n, 0, z}]]
CROSSREFS
KEYWORD
nonn,tabf,easy,base
AUTHOR
Clark Kimberling, Jun 13 2016
STATUS
approved