A183545 Ordering of the numbers in the tree A183543; complement of A183544.
3, 6, 10, 11, 17, 18, 19, 28, 29, 30, 31, 32, 46, 47, 48, 49, 50, 51, 52, 53, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 198, 199, 200
Offset: 1
Keywords
Programs
-
Mathematica
nn=200; g=(1+5^(1/2))/2; t={3}; t0=t; While[t=Select[Union[t,-2+Floor[(t+2)g],t+Floor[(t+2)g]], #<=nn&]; t0 !=t, t0=t]; t
Formula
The monotonic ordering of the numbers in the set S generated by these rules: 3 is in S, and if n is in S, then -2+Floor[(n+2)r] and n+Floor[(n+2)r] are in S, where r=(1+sqrt(5))/2, the golden ratio.
Comments