%I #13 May 25 2015 03:55:09
%S 2,6,8,11,15,20,21,27,28,29,37,38,39,41,51,52,53,55,57,68,71,72,73,74,
%T 77,80,92,95,96,99,100,101,103,104,108,113,126,129,130,133,134,135,
%U 139,140,141,142,145,147,152,159,174,177,178,180,182
%N Ordering of the numbers in set S generated by these rules: 2 is in S, and if n is in S then floor(r*n) and floor(s*n) are in S, where r=sqrt(2) and s=r/(r1).
%C The sequence results from flattening and sorting the tree at A183171. Complement of A183172, obtained from the tree at A183170.
%H Ivan Neretin, <a href="/A183173/b183173.txt">Table of n, a(n) for n = 1..10000</a>
%F (See A183171, A183172.)
%t nn=200; t={2}; r=Sqrt[2]; s=r/(r1); t0=t; While[t=Select[Union[t, Floor[r*t], Floor[s*t]], # <= nn &]; t0 != t, t0=t]; t
%Y Cf. A183171, A183172.
%K nonn
%O 1,1
%A _Clark Kimberling_, Dec 29 2010
%E Missing term 113 inserted by _John W. Layman_, Dec 29 2010
