%I #7 Aug 03 2014 14:27:15
%S 2,2,8,5,20,8,47,13,198,20,11,30,15,47,20,83,26,198,35,20,47,24,67,30,
%T 105,37,198,47,823,61,33,83,39,120,47,198,58,471,73,40,95,47,131,56,
%U 198,67,372,83,1960,105,55,139,64,198,76,326,91,823,113,61,145,71,198,83,299,99,578
%N a(n) = [ n/{n*sqrt(6)} ], where {x} := x - [ x ].
%H Clark Kimberling, <a href="/A024558/b024558.txt">Table of n, a(n) for n = 1..1000</a>
%t Table[Floor[n/FractionalPart[n*Sqrt[6]]], {n, 1, 100}]
%t (* _Clark Kimberling_, Aug 16 2012 *)
%Y Cf. A024559.
%K nonn
%O 1,1
%A _Clark Kimberling_