OFFSET
1,2
COMMENTS
A permutation of the positive integers.
LINKS
FORMULA
Let L(n)=Floor(r*n) and U(n)=Floor(s*n), where r=-1+sqrt(8) and s=r/(r-1).
The tree-array T(n,k) is then given by rows:
T(0,0) = 1; T(1,0) = 2; T(n,2j) = L(T(n-1),j); T(n,2j+1) = U(T(n-1),j);
for j=0,1,...,2^(n-1)-1, n>=2.
EXAMPLE
Top five rows:
1
2
3 4
5 6 7 8
9 11 10 13 12 15 14 17
MATHEMATICA
a = {1, 2}; row = {a[[-1]]}; r = Sqrt[8] - 1; s = r/(r - 1); Do[a = Join[a, row = Flatten[{Floor[#*{r, s}]} & /@ row]], {n, 5}]; a (* Ivan Neretin, Nov 09 2015 *)
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Clark Kimberling, Dec 23 2010
STATUS
approved